/ 64'er Special 15 / 64er_Magazin_Sonderheft_15_19xx_Markt__Technik_de_Side_A.d64 / ex.obj. merlin a

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 62 73 6f 75 74 20 | 65 71 75 20 24 66 66 64 |..bsout |equ $ffd|
|00000010| 32 0d 63 6c 72 63 68 20 | 65 71 75 20 24 66 66 63 |2.clrch |equ $ffc|
|00000020| 63 0d 63 68 6b 69 6e 20 | 65 71 75 20 24 66 66 63 |c.chkin |equ $ffc|
|00000030| 36 0d 70 72 74 73 74 67 | 20 65 71 75 20 24 61 62 |6.prtstg| equ $ab|
|00000040| 31 65 0d 67 65 74 69 6e | 20 65 71 75 20 24 66 31 |1e.getin| equ $f1|
|00000050| 34 32 0d 73 74 6f 70 20 | 65 71 75 20 24 66 66 65 |42.stop |equ $ffe|
|00000060| 31 0d 71 75 6f 74 65 20 | 65 71 75 20 24 30 30 64 |1.quote |equ $00d|
|00000070| 34 0d 63 6f 6e 76 65 72 | 74 20 65 71 75 20 24 62 |4.conver|t equ $b|
|00000080| 64 63 64 0d 63 68 72 69 | 6e 20 65 71 75 20 24 66 |dcd.chri|n equ $f|
|00000090| 66 63 66 0d 63 6c 72 73 | 63 6e 20 65 71 75 20 24 |fcf.clrs|cn equ $|
|000000a0| 65 35 34 34 0d 73 74 61 | 74 75 73 20 65 71 75 20 |e544.sta|tus equ |
|000000b0| 24 39 30 0d 66 6e 61 64 | 64 72 20 65 71 75 20 24 |$90.fnad|dr equ $|
|000000c0| 62 62 0d 66 6e 6c 65 6e | 67 20 65 71 75 20 24 62 |bb.fnlen|g equ $b|
|000000d0| 37 0d 64 65 76 6e 75 6d | 20 65 71 75 20 24 62 61 |7.devnum| equ $ba|
|000000e0| 0d 73 65 63 61 64 72 20 | 65 71 75 20 24 62 39 0d |.secadr |equ $b9.|
|000000f0| 73 65 6e 64 66 6e 20 65 | 71 75 20 24 66 33 64 35 |sendfn e|qu $f3d5|
|00000100| 0d 69 65 63 74 61 6c 6b | 20 65 71 75 20 24 66 66 |.iectalk| equ $ff|
|00000110| 62 34 0d 73 65 6e 64 73 | 65 63 20 65 71 75 20 24 |b4.sends|ec equ $|
|00000120| 66 66 39 36 0d 69 65 63 | 69 6e 70 20 65 71 75 20 |ff96.iec|inp equ |
|00000130| 24 66 66 61 35 0d 63 6c | 6f 73 66 69 6c 20 65 71 |$ffa5.cl|osfil eq|
|00000140| 75 20 24 66 36 34 32 0d | 6c 69 6e 65 70 72 74 20 |u $f642.|lineprt |
|00000150| 65 71 75 20 24 62 64 63 | 64 0d 73 65 74 6c 66 73 |equ $bdc|d.setlfs|
|00000160| 20 65 71 75 20 24 66 66 | 62 61 0d 73 65 74 66 6e | equ $ff|ba.setfn|
|00000170| 61 20 65 71 75 20 24 66 | 66 62 64 0d 6f 70 65 6e |a equ $f|fbd.open|
|00000180| 20 65 71 75 20 24 66 66 | 63 30 0d 63 6c 6f 73 65 | equ $ff|c0.close|
|00000190| 20 65 71 75 20 24 66 66 | 63 33 0d 72 65 61 64 79 | equ $ff|c3.ready|
|000001a0| 20 65 71 75 20 24 61 34 | 37 34 0d 2a 0d 2a 0d 2a | equ $a4|74.*.*.*|
|000001b0| 0d 2a 0d 2a a0 62 61 73 | 69 63 a0 48 45 41 44 45 |.*.*.bas|ic.HEADE|
|000001c0| 52 2e 0d 2a 0d 20 6f 72 | 67 20 24 38 30 31 0d 0d |R..*. or|g $801..|
|000001d0| 20 64 61 20 74 77 6f 62 | 72 6b 20 3b 66 49 52 53 | da twob|rk ;fIRS|
|000001e0| 54 a0 4c 49 4e 4b 0d 20 | 64 61 20 31 30 20 3b 6c |T.LINK. |da 10 ;l|
|000001f0| 49 4e 45 a0 4e 55 4d 42 | 45 52 a0 31 30 0d 20 64 |INE.NUMB|ER.10. d|
|00000200| 66 62 20 24 39 65 20 3b | 73 79 73 a0 54 4f 4b 45 |fb $9e ;|sys.TOKE|
|00000210| 4e 0d 20 74 78 74 20 27 | 32 30 36 31 27 0d 20 62 |N. txt '|2061'. b|
|00000220| 72 6b 20 3b 65 4e 44 a0 | 4f 46 a0 42 41 53 49 43 |rk ;eND.|OF.BASIC|
|00000230| a0 4c 49 4e 45 0d 74 77 | 6f 62 72 6b 20 64 61 20 |.LINE.tw|obrk da |
|00000240| 30 20 3b 65 4e 44 a0 4f | 46 a0 42 41 53 49 43 a0 |0 ;eND.O|F.BASIC.|
|00000250| 50 52 4f 47 52 41 4d 0d | 0d 20 65 72 72 20 2a 2d |PROGRAM.|. err *-|
|00000260| 32 30 36 31 0d 0d 2a 0d | 2a 0d 6d 65 6e 75 20 6a |2061..*.|*.menu j|
|00000270| 73 72 20 63 6c 72 73 63 | 6e 0d 20 6a 73 72 20 63 |sr clrsc|n. jsr c|
|00000280| 6c 73 66 69 6c 65 0d 20 | 6c 64 61 20 23 3c 74 69 |lsfile. |lda #<ti|
|00000290| 74 6c 65 0d 20 6c 64 79 | 20 23 3e 74 69 74 6c 65 |tle. ldy| #>title|
|000002a0| 0d 20 6a 73 72 20 70 72 | 74 73 74 67 0d 20 6a 73 |. jsr pr|tstg. js|
|000002b0| 72 20 63 72 20 3b 43 41 | 52 52 49 41 47 45 a0 52 |r cr ;CA|RRIAGE.R|
|000002c0| 45 54 55 52 4e 0d 20 6a | 73 72 20 63 72 0d 2a 0d |ETURN. j|sr cr.*.|
|000002d0| 2a a0 67 65 74 a0 46 49 | 4c 45 a0 4e 41 4d 45 0d |*.get.FI|LE.NAME.|
|000002e0| 2a 0d 20 6c 64 61 20 23 | 3c 66 69 6c 65 0d 20 6c |*. lda #|<file. l|
|000002f0| 64 79 20 23 3e 66 69 6c | 65 0d 20 6a 73 72 20 70 |dy #>fil|e. jsr p|
|00000300| 72 74 73 74 67 0d 20 6c | 64 79 20 23 24 30 30 0d |rtstg. l|dy #$00.|
|00000310| 72 64 20 6a 73 72 20 63 | 68 72 69 6e 0d 20 73 74 |rd jsr c|hrin. st|
|00000320| 61 20 66 69 6c 6e 61 6d | 65 2c 79 0d 20 69 6e 79 |a filnam|e,y. iny|
|00000330| 0d 20 63 6d 70 20 23 31 | 33 0d 20 62 6e 65 20 72 |. cmp #1|3. bne r|
|00000340| 64 0d 20 73 74 79 20 6e | 61 6d 65 6c 65 6e 67 0d |d. sty n|ameleng.|
|00000350| 20 64 65 63 20 6e 61 6d | 65 6c 65 6e 67 0d 20 6c | dec nam|eleng. l|
|00000360| 64 61 20 66 69 6c 6e 61 | 6d 65 20 3b 43 48 45 43 |da filna|me ;CHEC|
|00000370| 4b a0 49 46 a0 27 24 27 | 0d 20 63 6d 70 20 23 27 |K.IF.'$'|. cmp #'|
|00000380| 24 0d 20 62 6e 65 20 72 | 64 31 0d 20 6a 6d 70 20 |$. bne r|d1. jmp |
|00000390| 64 6c 69 73 74 20 3b 49 | 46 a0 24 a0 54 48 45 4e |dlist ;I|F.$.THEN|
|000003a0| a0 53 48 4f 57 a0 44 49 | 52 45 43 54 4f 52 59 0d |.SHOW.DI|RECTORY.|
|000003b0| 72 64 31 20 63 6d 70 20 | 23 27 5f 20 3b 45 4e 44 |rd1 cmp |#'_ ;END|
|000003c0| a0 50 52 4f 47 52 41 4d | 0d 20 62 6e 65 20 72 64 |.PROGRAM|. bne rd|
|000003d0| 32 0d 20 6a 6d 70 20 72 | 65 61 64 79 0d 72 64 32 |2. jmp r|eady.rd2|
|000003e0| 20 6a 73 72 20 63 72 0d | 2a 0d 2a a0 67 65 74 a0 | jsr cr.|*.*.get.|
|000003f0| 46 49 4c 45 a0 54 59 50 | 45 0d 2a 0d 20 6c 64 61 |FILE.TYP|E.*. lda|
|00000400| 20 23 3c 66 69 6c 74 79 | 70 65 0d 20 6c 64 79 20 | #<filty|pe. ldy |
|00000410| 23 3e 66 69 6c 74 79 70 | 65 0d 20 6a 73 72 20 70 |#>filtyp|e. jsr p|
|00000420| 72 74 73 74 67 0d 67 65 | 74 74 79 70 65 20 63 6c |rtstg.ge|ttype cl|
|00000430| 63 0d 20 6a 73 72 20 67 | 65 74 69 6e 0d 20 62 65 |c. jsr g|etin. be|
|00000440| 71 20 67 65 74 74 79 70 | 65 0d 20 63 6d 70 20 23 |q gettyp|e. cmp #|
|00000450| 27 31 0d 20 62 6e 65 20 | 67 65 74 74 79 70 65 31 |'1. bne |gettype1|
|00000460| 0d 20 6c 64 61 20 23 27 | 50 0d 20 6a 6d 70 20 64 |. lda #'|P. jmp d|
|00000470| 6f 6e 65 0d 67 65 74 74 | 79 70 65 31 20 63 6d 70 |one.gett|ype1 cmp|
|00000480| 20 23 27 32 0d 20 62 6e | 65 20 67 65 74 74 79 70 | #'2. bn|e gettyp|
|00000490| 65 32 0d 20 6c 64 61 20 | 23 27 53 0d 20 6a 6d 70 |e2. lda |#'S. jmp|
|000004a0| 20 64 6f 6e 65 0d 67 65 | 74 74 79 70 65 32 20 63 | done.ge|ttype2 c|
|000004b0| 6d 70 20 23 27 33 0d 20 | 62 6e 65 20 67 65 74 74 |mp #'3. |bne gett|
|000004c0| 79 70 65 0d 20 6c 64 61 | 20 23 27 55 0d 64 6f 6e |ype. lda| #'U.don|
|000004d0| 65 20 73 74 61 20 74 6d | 70 0d 2a 0d 2a a0 67 65 |e sta tm|p.*.*.ge|
|000004e0| 74 a0 44 49 53 50 4c 41 | 59 a0 54 59 50 45 0d 2a |t.DISPLA|Y.TYPE.*|
|000004f0| 0d 20 6c 64 61 20 23 3c | 64 69 73 70 6c 61 79 0d |. lda #<|display.|
|00000500| 20 6c 64 79 20 23 3e 64 | 69 73 70 6c 61 79 0d 20 | ldy #>d|isplay. |
|00000510| 6a 73 72 20 70 72 74 73 | 74 67 0d 2a 0d 2a 0d 72 |jsr prts|tg.*.*.r|
|00000520| 64 6b 65 79 20 6a 73 72 | 20 67 65 74 69 6e 20 3b |dkey jsr| getin ;|
|00000530| 57 41 49 54 a0 46 4f 52 | a0 41 a0 4b 45 59 0d 20 |WAIT.FOR|.A.KEY. |
|00000540| 62 65 71 20 72 64 6b 65 | 79 20 3b 54 4f a0 49 4e |beq rdke|y ;TO.IN|
|00000550| 44 49 43 41 54 45 0d 20 | 63 6d 70 20 23 27 42 20 |DICATE. |cmp #'B |
|00000560| 3b 49 46 a0 62 61 73 69 | 63 a0 50 52 47 0d 20 62 |;IF.basi|c.PRG. b|
|00000570| 6e 65 20 72 64 6b 65 79 | 31 0d 20 6c 64 61 20 74 |ne rdkey|1. lda t|
|00000580| 6d 70 0d 20 6a 73 72 20 | 6f 70 6e 66 69 6c 65 0d |mp. jsr |opnfile.|
|00000590| 20 6c 64 61 20 23 32 33 | 0d 20 73 74 61 20 73 63 | lda #23|. sta sc|
|000005a0| 72 6e 6c 69 6e 65 20 3b | 4d 41 58 2e a0 4e 4f a0 |rnline ;|MAX..NO.|
|000005b0| 4f 46 a0 4c 49 4e 45 53 | a0 50 45 52 a0 53 43 52 |OF.LINES|.PER.SCR|
|000005c0| 45 45 4e 0d 20 6a 6d 70 | 20 72 64 62 61 73 0d 72 |EEN. jmp| rdbas.r|
|000005d0| 64 6b 65 79 31 20 63 6d | 70 20 23 27 4d 20 3b 4f |dkey1 cm|p #'M ;O|
|000005e0| 52 a0 6d 6c a0 50 52 47 | 0d 20 62 6e 65 20 72 64 |R.ml.PRG|. bne rd|
|000005f0| 6b 65 79 32 0d 20 6c 64 | 61 20 74 6d 70 0d 20 6a |key2. ld|a tmp. j|
|00000600| 73 72 20 6f 70 6e 66 69 | 6c 65 0d 20 6c 64 61 20 |sr opnfi|le. lda |
|00000610| 23 32 34 0d 20 73 74 61 | 20 73 63 72 6e 6c 69 6e |#24. sta| scrnlin|
|00000620| 65 20 3b 4d 41 58 2e a0 | 4e 4f a0 4f 46 a0 4c 49 |e ;MAX..|NO.OF.LI|
|00000630| 4e 45 53 a0 50 45 52 a0 | 53 43 52 45 45 4e 0d 20 |NES.PER.|SCREEN. |
|00000640| 6a 6d 70 20 72 64 6d 6c | 0d 72 64 6b 65 79 32 20 |jmp rdml|.rdkey2 |
|00000650| 63 6d 70 20 23 27 46 20 | 3b 6f 72 a0 66 69 6c 65 |cmp #'F |;or.file|
|00000660| a0 44 49 53 50 4c 41 59 | a0 54 59 50 45 0d 20 62 |.DISPLAY|.TYPE. b|
|00000670| 6e 65 20 72 64 6b 65 79 | 0d 20 6c 64 61 20 74 6d |ne rdkey|. lda tm|
|00000680| 70 0d 20 6a 73 72 20 6f | 70 6e 66 69 6c 65 0d 20 |p. jsr o|pnfile. |
|00000690| 6c 64 61 20 23 32 34 0d | 20 73 74 61 20 73 63 72 |lda #24.| sta scr|
|000006a0| 6e 6c 69 6e 65 0d 20 6a | 6d 70 20 72 64 73 65 71 |nline. j|mp rdseq|
|000006b0| 0d 2a 0d 2a 0d 2a 0d 72 | 64 73 65 71 20 6a 73 72 |.*.*.*.r|dseq jsr|
|000006c0| 20 63 68 6b 6b 65 79 20 | 3b 43 48 45 43 4b a0 49 | chkkey |;CHECK.I|
|000006d0| 4e 50 55 54 a0 46 4d a0 | 4b 45 59 42 4f 41 52 44 |NPUT.FM.|KEYBOARD|
|000006e0| 0d 20 6a 73 72 20 63 68 | 6b 6c 69 6e 65 0d 20 6c |. jsr ch|kline. l|
|000006f0| 64 61 20 73 74 61 74 75 | 73 0d 20 62 65 71 20 72 |da statu|s. beq r|
|00000700| 64 73 65 71 31 0d 20 6a | 6d 70 20 65 6f 66 0d 72 |dseq1. j|mp eof.r|
|00000710| 64 73 65 71 31 20 6a 73 | 72 20 67 65 74 62 79 74 |dseq1 js|r getbyt|
|00000720| 65 0d 20 63 6d 70 20 23 | 31 33 20 3b 43 41 52 52 |e. cmp #|13 ;CARR|
|00000730| 49 41 47 45 a0 52 45 54 | 55 52 4e 3f 0d 20 62 65 |IAGE.RET|URN?. be|
|00000740| 71 20 70 72 74 63 68 61 | 72 0d 20 63 6d 70 20 23 |q prtcha|r. cmp #|
|00000750| 24 32 30 20 3b 49 53 a0 | 49 54 a0 50 52 49 4e 54 |$20 ;IS.|IT.PRINT|
|00000760| 41 42 4c 45 3f 0d 20 62 | 63 63 20 6e 65 78 74 62 |ABLE?. b|cc nextb|
|00000770| 79 74 65 0d 20 63 6d 70 | 20 23 24 38 30 0d 20 62 |yte. cmp| #$80. b|
|00000780| 63 63 20 70 72 74 63 68 | 61 72 0d 20 63 6d 70 20 |cc prtch|ar. cmp |
|00000790| 23 24 61 30 0d 20 62 63 | 63 20 6e 65 78 74 62 79 |#$a0. bc|c nextby|
|000007a0| 74 65 0d 70 72 74 63 68 | 61 72 20 6a 73 72 20 62 |te.prtch|ar jsr b|
|000007b0| 73 6f 75 74 0d 6e 65 78 | 74 62 79 74 65 20 6a 6d |sout.nex|tbyte jm|
|000007c0| 70 20 72 64 73 65 71 0d | 2a 0d 2a a0 6f 70 65 6e |p rdseq.|*.*.open|
|000007d0| a0 43 48 41 4e 4e 45 4c | a0 54 4f a0 44 49 53 4b |.CHANNEL|.TO.DISK|
|000007e0| a0 44 52 49 56 45 0d 2a | 0d 6f 70 6e 66 69 6c 65 |.DRIVE.*|.opnfile|
|000007f0| 20 73 74 61 20 74 6d 70 | 0d 20 6a 73 72 20 63 6c | sta tmp|. jsr cl|
|00000800| 73 66 69 6c 65 0d 20 6c | 64 79 20 6e 61 6d 65 6c |sfile. l|dy namel|
|00000810| 65 6e 67 0d 20 6c 64 61 | 20 23 27 2c 0d 20 73 74 |eng. lda| #',. st|
|00000820| 61 20 66 69 6c 6e 61 6d | 65 2c 79 0d 20 69 6e 79 |a filnam|e,y. iny|
|00000830| 0d 20 69 6e 79 0d 20 73 | 74 61 20 66 69 6c 6e 61 |. iny. s|ta filna|
|00000840| 6d 65 2c 79 0d 20 69 6e | 79 0d 20 6c 64 61 20 23 |me,y. in|y. lda #|
|00000850| 27 52 0d 20 73 74 61 20 | 66 69 6c 6e 61 6d 65 2c |'R. sta |filname,|
|00000860| 79 0d 20 73 74 79 20 6e | 61 6d 65 6c 65 6e 67 0d |y. sty n|ameleng.|
|00000870| 20 6c 64 61 20 23 30 0d | 20 69 6e 79 0d 20 73 74 | lda #0.| iny. st|
|00000880| 61 20 66 69 6c 6e 61 6d | 65 2c 79 0d 20 64 65 79 |a filnam|e,y. dey|
|00000890| 0d 20 64 65 79 0d 20 64 | 65 79 0d 20 6c 64 61 20 |. dey. d|ey. lda |
|000008a0| 74 6d 70 0d 20 73 74 61 | 20 66 69 6c 6e 61 6d 65 |tmp. sta| filname|
|000008b0| 2c 79 0d 2a 0d 20 6a 73 | 72 20 63 6c 72 73 63 6e |,y.*. js|r clrscn|
|000008c0| 0d 20 6c 64 61 20 23 3c | 72 64 69 6e 67 0d 20 6c |. lda #<|rding. l|
|000008d0| 64 79 20 23 3e 72 64 69 | 6e 67 0d 20 6a 73 72 20 |dy #>rdi|ng. jsr |
|000008e0| 70 72 74 73 74 67 0d 20 | 6c 64 61 20 23 3c 66 69 |prtstg. |lda #<fi|
|000008f0| 6c 6e 61 6d 65 0d 20 6c | 64 79 20 23 3e 66 69 6c |lname. l|dy #>fil|
|00000900| 6e 61 6d 65 0d 20 6a 73 | 72 20 70 72 74 73 74 67 |name. js|r prtstg|
|00000910| 0d 20 6a 73 72 20 63 72 | 31 0d 2a 0d 20 6c 64 61 |. jsr cr|1.*. lda|
|00000920| 20 23 30 0d 20 73 74 61 | 20 73 74 61 74 75 73 0d | #0. sta| status.|
|00000930| 20 63 6c 63 0d 20 6c 64 | 61 20 23 32 20 3b 4f 50 | clc. ld|a #2 ;OP|
|00000940| 45 4e 31 35 2c 38 2c 31 | 35 2c 22 49 30 22 0d 20 |EN15,8,1|5,"I0". |
|00000950| 6c 64 79 20 23 3e 69 30 | 0d 20 6c 64 78 20 23 3c |ldy #>i0|. ldx #<|
|00000960| 69 30 0d 20 6a 73 72 20 | 73 65 74 66 6e 61 0d 20 |i0. jsr |setfna. |
|00000970| 6c 64 61 20 23 31 35 0d | 20 74 61 79 0d 20 6c 64 |lda #15.| tay. ld|
|00000980| 78 20 23 38 0d 20 6a 73 | 72 20 73 65 74 6c 66 73 |x #8. js|r setlfs|
|00000990| 0d 20 6a 73 72 20 6f 70 | 65 6e 0d 2a 0d 20 63 6c |. jsr op|en.*. cl|
|000009a0| 63 0d 20 6c 64 61 20 23 | 38 20 3b 4f 50 45 4e 38 |c. lda #|8 ;OPEN8|
|000009b0| 2c 38 2c 38 2c 22 46 49 | 4c 45 4e 41 4d 45 2c 50 |,8,8,"FI|LENAME,P|
|000009c0| 2c 52 22 0d 20 74 61 78 | 0d 20 74 61 79 0d 20 6a |,R". tax|. tay. j|
|000009d0| 73 72 20 73 65 74 6c 66 | 73 0d 20 6c 64 78 20 23 |sr setlf|s. ldx #|
|000009e0| 3c 66 69 6c 6e 61 6d 65 | 0d 20 6c 64 79 20 23 3e |<filname|. ldy #>|
|000009f0| 66 69 6c 6e 61 6d 65 0d | 20 6c 64 61 20 6e 61 6d |filname.| lda nam|
|00000a00| 65 6c 65 6e 67 0d 20 6a | 73 72 20 73 65 74 66 6e |eleng. j|sr setfn|
|00000a10| 61 0d 20 6a 73 72 20 6f | 70 65 6e 0d 2a 0d 20 6c |a. jsr o|pen.*. l|
|00000a20| 64 78 20 23 31 35 0d 20 | 6a 73 72 20 63 68 6b 69 |dx #15. |jsr chki|
|00000a30| 6e 0d 20 6c 64 61 20 23 | 30 0d 20 73 74 61 20 73 |n. lda #|0. sta s|
|00000a40| 74 61 74 75 73 0d 64 65 | 72 72 31 20 6c 64 79 20 |tatus.de|rr1 ldy |
|00000a50| 73 74 61 74 75 73 0d 20 | 62 6e 65 20 64 65 72 72 |status. |bne derr|
|00000a60| 32 0d 20 6a 73 72 20 63 | 68 72 69 6e 0d 20 6a 73 |2. jsr c|hrin. js|
|00000a70| 72 20 62 73 6f 75 74 0d | 20 63 6d 70 20 23 31 33 |r bsout.| cmp #13|
|00000a80| 0d 20 62 6e 65 20 64 65 | 72 72 31 0d 64 65 72 72 |. bne de|rr1.derr|
|00000a90| 32 20 6a 73 72 20 63 6c | 72 63 68 0d 2a 0d 20 6a |2 jsr cl|rch.*. j|
|00000aa0| 73 72 20 63 72 0d 20 6c | 64 78 20 23 38 0d 20 6a |sr cr. l|dx #8. j|
|00000ab0| 73 72 20 63 68 6b 69 6e | 0d 20 72 74 73 0d 2a 0d |sr chkin|. rts.*.|
|00000ac0| 2a 0d 2a 0d 2a 0d 63 6c | 73 66 69 6c 65 20 6a 73 |*.*.*.cl|sfile js|
|00000ad0| 72 20 63 6c 72 63 68 0d | 20 6c 64 61 20 23 38 0d |r clrch.| lda #8.|
|00000ae0| 20 6a 73 72 20 63 6c 6f | 73 65 0d 20 6c 64 61 20 | jsr clo|se. lda |
|00000af0| 23 31 35 0d 20 6a 73 72 | 20 63 6c 6f 73 65 0d 20 |#15. jsr| close. |
|00000b00| 72 74 73 0d 2a 0d 2a 0d | 2a 0d 2a a0 70 72 69 6e |rts.*.*.|*.*.prin|
|00000b10| 74 a0 6f 75 74 a0 68 65 | 78 a0 6e 75 6d 62 65 72 |t.out.he|x.number|
|00000b20| 0d 2a 0d 2a 0d 70 72 74 | 68 65 78 20 70 68 61 0d |.*.*.prt|hex pha.|
|00000b30| 20 6c 73 72 20 61 0d 20 | 6c 73 72 20 61 0d 20 6c | lsr a. |lsr a. l|
|00000b40| 73 72 20 61 0d 20 6c 73 | 72 20 61 0d 20 74 61 78 |sr a. ls|r a. tax|
|00000b50| 0d 20 6c 64 61 20 68 65 | 78 6c 69 6e 65 2c 78 0d |. lda he|xline,x.|
|00000b60| 20 6a 73 72 20 62 73 6f | 75 74 0d 20 70 6c 61 0d | jsr bso|ut. pla.|
|00000b70| 20 61 6e 64 20 23 24 30 | 66 0d 20 74 61 78 0d 20 | and #$0|f. tax. |
|00000b80| 6c 64 61 20 68 65 78 6c | 69 6e 65 2c 78 0d 20 6a |lda hexl|ine,x. j|
|00000b90| 73 72 20 62 73 6f 75 74 | 0d 20 72 74 73 0d 2a 0d |sr bsout|. rts.*.|
|00000ba0| 2a 0d 67 65 74 62 79 74 | 65 20 6c 64 61 20 23 30 |*.getbyt|e lda #0|
|00000bb0| 0d 20 73 74 61 20 24 39 | 30 0d 20 6a 73 72 20 63 |. sta $9|0. jsr c|
|00000bc0| 68 72 69 6e 0d 20 73 74 | 61 20 74 6d 70 0d 20 6c |hrin. st|a tmp. l|
|00000bd0| 64 61 20 24 39 30 0d 20 | 62 6e 65 20 67 65 74 62 |da $90. |bne getb|
|00000be0| 31 0d 20 6c 64 61 20 74 | 6d 70 0d 20 72 74 73 0d |1. lda t|mp. rts.|
|00000bf0| 67 65 74 62 31 20 6a 6d | 70 20 65 6f 66 0d 2a 0d |getb1 jm|p eof.*.|
|00000c00| 2a 0d 2a a0 72 65 61 64 | a0 6d 6c a0 70 72 6f 67 |*.*.read|.ml.prog|
|00000c10| 72 61 6d 0d 2a 0d 72 64 | 6d 6c 20 63 6c 63 0d 20 |ram.*.rd|ml clc. |
|00000c20| 6a 73 72 20 67 65 74 62 | 79 74 65 20 3b 47 45 54 |jsr getb|yte ;GET|
|00000c30| a0 53 54 41 52 54 41 44 | 44 52 a0 4c 4f 2d 42 59 |.STARTAD|DR.LO-BY|
|00000c40| 54 45 0d 20 73 74 61 20 | 24 66 62 0d 20 6a 73 72 |TE. sta |$fb. jsr|
|00000c50| 20 67 65 74 62 79 74 65 | 20 3b 47 45 54 a0 53 54 | getbyte| ;GET.ST|
|00000c60| 41 52 54 41 44 44 52 a0 | 48 49 2d 42 59 54 45 0d |ARTADDR.|HI-BYTE.|
|00000c70| 20 73 74 61 20 24 66 63 | 0d 72 64 6d 6c 30 20 6a | sta $fc|.rdml0 j|
|00000c80| 73 72 20 63 68 6b 6b 65 | 79 0d 20 6a 73 72 20 63 |sr chkke|y. jsr c|
|00000c90| 68 6b 6c 69 6e 65 0d 20 | 63 6c 63 0d 20 6a 73 72 |hkline. |clc. jsr|
|00000ca0| 20 69 6e 69 74 73 74 67 | 20 3b 49 4e 49 54 49 41 | initstg| ;INITIA|
|00000cb0| 4c 49 5a 45 a0 43 48 41 | 52 2d 53 54 52 49 4e 47 |LIZE.CHA|R-STRING|
|00000cc0| 0d 20 6c 64 61 20 24 66 | 63 20 3b 50 52 49 4e 54 |. lda $f|c ;PRINT|
|00000cd0| a0 41 44 44 52 45 53 53 | 0d 20 6a 73 72 20 70 72 |.ADDRESS|. jsr pr|
|00000ce0| 74 68 65 78 0d 20 6c 64 | 61 20 24 66 62 0d 20 6a |thex. ld|a $fb. j|
|00000cf0| 73 72 20 70 72 74 68 65 | 78 0d 20 6c 64 61 20 23 |sr prthe|x. lda #|
|00000d00| 24 32 30 20 3b 50 52 49 | 4e 54 a0 32 a0 53 50 41 |$20 ;PRI|NT.2.SPA|
|00000d10| 43 45 53 0d 20 6a 73 72 | 20 62 73 6f 75 74 0d 20 |CES. jsr| bsout. |
|00000d20| 6c 64 61 20 23 24 32 30 | 0d 20 6a 73 72 20 62 73 |lda #$20|. jsr bs|
|00000d30| 6f 75 74 0d 2a 0d 20 6a | 73 72 20 67 65 74 62 79 |out.*. j|sr getby|
|00000d40| 74 65 20 3b 47 45 54 a0 | 31 a0 42 59 54 45 0d 20 |te ;GET.|1.BYTE. |
|00000d50| 73 74 61 20 24 66 64 20 | 3b 53 54 4f 52 45 a0 49 |sta $fd |;STORE.I|
|00000d60| 54 0d 20 6c 64 79 20 23 | 30 0d 20 6a 73 72 20 73 |T. ldy #|0. jsr s|
|00000d70| 74 6f 72 65 73 74 67 0d | 20 6a 73 72 20 70 72 74 |torestg.| jsr prt|
|00000d80| 68 65 78 20 3b 50 52 49 | 4e 54 53 a0 49 54 0d 20 |hex ;PRI|NTS.IT. |
|00000d90| 69 6e 63 20 24 66 62 20 | 3b 41 44 44 52 3d 41 44 |inc $fb |;ADDR=AD|
|00000da0| 44 52 2b 31 0d 20 62 6e | 65 20 72 64 6d 6c 31 0d |DR+1. bn|e rdml1.|
|00000db0| 20 69 6e 63 20 24 66 63 | 0d 72 64 6d 6c 31 20 6c | inc $fc|.rdml1 l|
|00000dc0| 64 78 20 24 66 64 20 3b | 55 53 45 a0 49 4e 53 54 |dx $fd ;|USE.INST|
|00000dd0| 52 55 43 54 49 4f 4e a0 | 41 53 a0 50 4f 49 4e 54 |RUCTION.|AS.POINT|
|00000de0| 45 52 0d 20 6c 64 61 20 | 69 6e 64 69 72 2c 78 20 |ER. lda |indir,x |
|00000df0| 3b 46 49 4e 44 a0 41 44 | 44 52 45 53 53 49 4e 47 |;FIND.AD|DRESSING|
|00000e00| a0 4d 4f 44 45 0d 20 73 | 74 61 20 24 66 61 20 3b |.MODE. s|ta $fa ;|
|00000e10| 53 54 4f 52 45 a0 49 54 | 0d 20 62 65 71 20 72 64 |STORE.IT|. beq rd|
|00000e20| 6d 6c 33 20 3b 49 46 a0 | 41 44 44 52 3d 30 a0 54 |ml3 ;IF.|ADDR=0.T|
|00000e30| 48 45 4e a0 49 4d 50 4c | 49 45 44 a0 4d 4f 44 45 |HEN.IMPL|IED.MODE|
|00000e40| 0d 20 6c 64 61 20 23 24 | 32 30 20 3b 53 50 41 43 |. lda #$|20 ;SPAC|
|00000e50| 45 0d 20 6a 73 72 20 62 | 73 6f 75 74 0d 20 6a 73 |E. jsr b|sout. js|
|00000e60| 72 20 67 65 74 62 79 74 | 65 20 3b 47 45 54 a0 32 |r getbyt|e ;GET.2|
|00000e70| 4e 44 a0 42 59 54 45 0d | 20 73 74 61 20 24 66 65 |ND.BYTE.| sta $fe|
|00000e80| 20 3b 53 54 4f 52 45 a0 | 49 54 0d 20 6c 64 79 20 | ;STORE.|IT. ldy |
|00000e90| 23 31 0d 20 6a 73 72 20 | 73 74 6f 72 65 73 74 67 |#1. jsr |storestg|
|00000ea0| 0d 20 6a 73 72 20 70 72 | 74 68 65 78 20 3b 50 52 |. jsr pr|thex ;PR|
|00000eb0| 49 4e 54 a0 49 54 0d 20 | 69 6e 63 20 24 66 62 0d |INT.IT. |inc $fb.|
|00000ec0| 20 62 6e 65 20 72 64 6d | 6c 32 0d 20 69 6e 63 20 | bne rdm|l2. inc |
|00000ed0| 24 66 63 0d 72 64 6d 6c | 32 20 6c 64 61 20 24 66 |$fc.rdml|2 lda $f|
|00000ee0| 61 20 3b 49 46 a0 41 44 | 44 52 3c 38 a0 42 52 41 |a ;IF.AD|DR<8.BRA|
|00000ef0| 4e 43 48 a0 28 32 2d 62 | 79 74 65 a0 6f 70 63 6f |NCH.(2-b|yte.opco|
|00000f00| 64 65 73 29 0d 20 63 6d | 70 20 23 38 0d 20 62 63 |des). cm|p #8. bc|
|00000f10| 63 20 72 64 6d 6c 33 0d | 20 6c 64 61 20 23 24 32 |c rdml3.| lda #$2|
|00000f20| 30 20 3b 53 50 41 43 45 | 0d 20 6a 73 72 20 62 73 |0 ;SPACE|. jsr bs|
|00000f30| 6f 75 74 0d 20 6a 73 72 | 20 67 65 74 62 79 74 65 |out. jsr| getbyte|
|00000f40| 20 3b 47 45 54 a0 33 52 | 44 a0 42 59 54 45 0d 20 | ;GET.3R|D.BYTE. |
|00000f50| 73 74 61 20 24 66 66 20 | 3b 53 54 4f 52 45 a0 49 |sta $ff |;STORE.I|
|00000f60| 54 0d 20 6c 64 79 20 23 | 32 0d 20 6a 73 72 20 73 |T. ldy #|2. jsr s|
|00000f70| 74 6f 72 65 73 74 67 0d | 20 6a 73 72 20 70 72 74 |torestg.| jsr prt|
|00000f80| 68 65 78 20 3b 50 52 49 | 4e 54 a0 49 54 0d 20 69 |hex ;PRI|NT.IT. i|
|00000f90| 6e 63 20 24 66 62 0d 20 | 62 6e 65 20 72 64 6d 6c |nc $fb. |bne rdml|
|00000fa0| 33 0d 20 69 6e 63 20 24 | 66 63 0d 72 64 6d 6c 33 |3. inc $|fc.rdml3|
|00000fb0| 20 63 6c 63 20 20 3b 74 | 61 62 28 31 36 29 0d 20 | clc  ;t|ab(16). |
|00000fc0| 6c 64 78 20 24 64 36 0d | 20 6c 64 79 20 23 24 31 |ldx $d6.| ldy #$1|
|00000fd0| 30 0d 20 6a 73 72 20 24 | 66 66 66 30 20 3b 4b 45 |0. jsr $|fff0 ;KE|
|00000fe0| 52 4e 41 4c 27 53 a0 70 | 6c 6f 74 0d 20 6c 64 79 |RNAL'S.p|lot. ldy|
|00000ff0| 20 24 66 64 20 3b 55 53 | 45 a0 43 4f 44 45 a0 41 | $fd ;US|E.CODE.A|
|00001000| 53 a0 50 4f 49 4e 54 45 | 52 0d 20 6c 64 61 20 63 |S.POINTE|R. lda c|
|00001010| 6f 64 69 73 2c 79 0d 20 | 74 61 79 20 20 3b 55 53 |odis,y. |tay  ;US|
|00001020| 45 a0 43 4f 44 45 a0 41 | 53 a0 4e 45 57 a0 50 4f |E.CODE.A|S.NEW.PO|
|00001030| 49 4e 54 45 52 0d 20 6c | 64 78 20 23 33 20 3b 54 |INTER. l|dx #3 ;T|
|00001040| 4f a0 46 49 4e 44 a0 4f | 50 43 4f 44 45 0d 72 64 |O.FIND.O|PCODE.rd|
|00001050| 6d 6c 34 20 6c 64 61 20 | 6d 6e 65 6d 6f 2c 79 0d |ml4 lda |mnemo,y.|
|00001060| 20 6a 73 72 20 62 73 6f | 75 74 0d 20 69 6e 79 0d | jsr bso|ut. iny.|
|00001070| 20 64 65 78 0d 20 62 6e | 65 20 72 64 6d 6c 34 20 | dex. bn|e rdml4 |
|00001080| 3b 33 a0 43 48 41 52 53 | 3f 0d 2a 0d 20 6c 64 61 |;3.CHARS|?.*. lda|
|00001090| 20 23 24 32 30 20 3b 50 | 52 49 4e 54 a0 53 50 41 | #$20 ;P|RINT.SPA|
|000010a0| 43 45 0d 20 6a 73 72 20 | 62 73 6f 75 74 0d 20 6c |CE. jsr |bsout. l|
|000010b0| 64 79 20 24 66 61 20 3b | 49 46 a0 41 44 44 52 3d |dy $fa ;|IF.ADDR=|
|000010c0| 30 a0 28 49 4d 50 4c 49 | 45 44 29 a0 54 48 45 4e |0.(IMPLI|ED).THEN|
|000010d0| a0 42 52 41 4e 43 48 0d | 20 62 65 71 20 72 64 6d |.BRANCH.| beq rdm|
|000010e0| 6c 31 33 0d 20 63 70 79 | 20 23 32 20 3b 49 46 a0 |l13. cpy| #2 ;IF.|
|000010f0| 41 44 44 52 3d 32 a0 28 | 52 45 4c 41 54 49 56 45 |ADDR=2.(|RELATIVE|
|00001100| 29 a0 54 48 45 4e a0 42 | 52 41 4e 43 48 0d 20 62 |).THEN.B|RANCH. b|
|00001110| 65 71 20 62 72 61 6e 63 | 68 0d 20 63 70 79 20 23 |eq branc|h. cpy #|
|00001120| 36 20 3b 27 62 72 61 6e | 63 68 27 a0 43 4f 44 45 |6 ;'bran|ch'.CODE|
|00001130| 0d 20 62 63 63 20 72 64 | 6d 6c 35 0d 20 63 70 79 |. bcc rd|ml5. cpy|
|00001140| 20 23 39 20 3b 49 46 a0 | 41 44 44 52 a0 36 2c 37 | #9 ;IF.|ADDR.6,7|
|00001150| 2c 4f 52 a0 38 a0 28 49 | 4e 44 49 52 45 43 54 29 |,OR.8.(I|NDIRECT)|
|00001160| a0 50 52 49 4e 54 a0 27 | 28 0d 20 62 63 73 20 72 |.PRINT.'|(. bcs r|
|00001170| 64 6d 6c 35 0d 20 6c 64 | 61 20 23 24 32 38 0d 20 |dml5. ld|a #$28. |
|00001180| 6a 73 72 20 62 73 6f 75 | 74 0d 72 64 6d 6c 35 20 |jsr bsou|t.rdml5 |
|00001190| 63 70 79 20 23 31 20 3b | 49 46 a0 41 44 44 52 3d |cpy #1 ;|IF.ADDR=|
|000011a0| 31 a0 28 49 4d 4d 45 44 | 49 41 54 45 29 a0 50 52 |1.(IMMED|IATE).PR|
|000011b0| 49 4e 54 a0 27 23 0d 20 | 62 6e 65 20 72 64 6d 6c |INT.'#. |bne rdml|
|000011c0| 36 0d 20 6c 64 61 20 23 | 24 32 33 0d 20 6a 73 72 |6. lda #|$23. jsr|
|000011d0| 20 62 73 6f 75 74 0d 72 | 64 6d 6c 36 20 63 70 79 | bsout.r|dml6 cpy|
|000011e0| 20 23 38 0d 20 62 63 63 | 20 72 64 6d 6c 38 20 3b | #8. bcc| rdml8 ;|
|000011f0| 49 46 a0 33 2d 42 59 54 | 45 a0 49 4e 53 54 52 55 |IF.3-BYT|E.INSTRU|
|00001200| 43 54 49 4f 4e 0d 72 64 | 6d 6c 37 20 6c 64 61 20 |CTION.rd|ml7 lda |
|00001210| 24 66 66 20 3b 50 52 49 | 4e 54 a0 41 44 44 52 45 |$ff ;PRI|NT.ADDRE|
|00001220| 53 53 0d 20 6a 73 72 20 | 70 72 74 68 65 78 0d 72 |SS. jsr |prthex.r|
|00001230| 64 6d 6c 38 20 6c 64 61 | 20 24 66 65 20 3b 45 4c |dml8 lda| $fe ;EL|
|00001240| 53 45 a0 50 52 49 4e 54 | a0 31 a0 48 45 58 42 59 |SE.PRINT|.1.HEXBY|
|00001250| 54 45 a0 4f 4e 4c 59 0d | 20 6a 73 72 20 70 72 74 |TE.ONLY.| jsr prt|
|00001260| 68 65 78 0d 20 63 70 79 | 20 23 34 0d 20 62 65 71 |hex. cpy| #4. beq|
|00001270| 20 72 64 6d 6c 39 0d 20 | 63 70 79 20 23 36 0d 20 | rdml9. |cpy #6. |
|00001280| 62 65 71 20 72 64 6d 6c | 39 0d 20 63 70 79 20 23 |beq rdml|9. cpy #|
|00001290| 39 0d 20 62 6e 65 20 72 | 64 6d 6c 31 30 0d 72 64 |9. bne r|dml10.rd|
|000012a0| 6d 6c 39 20 6c 64 61 20 | 23 24 32 63 20 3b 49 46 |ml9 lda |#$2c ;IF|
|000012b0| a0 41 44 44 52 a0 34 2c | 36 2c 4f 52 a0 39 a0 50 |.ADDR.4,|6,OR.9.P|
|000012c0| 52 49 4e 54 a0 27 2c 78 | 0d 20 6a 73 72 20 62 73 |RINT.',x|. jsr bs|
|000012d0| 6f 75 74 0d 20 6c 64 61 | 20 23 24 35 38 0d 20 6a |out. lda| #$58. j|
|000012e0| 73 72 20 62 73 6f 75 74 | 0d 72 64 6d 6c 31 30 20 |sr bsout|.rdml10 |
|000012f0| 63 70 79 20 23 36 20 3b | 49 46 a0 41 44 44 52 a0 |cpy #6 ;|IF.ADDR.|
|00001300| 36 2c 37 a0 4f 52 a0 38 | a0 50 52 49 4e 54 a0 27 |6,7.OR.8|.PRINT.'|
|00001310| 29 0d 20 62 63 63 20 72 | 64 6d 6c 31 31 0d 20 63 |). bcc r|dml11. c|
|00001320| 70 79 20 23 39 0d 20 62 | 63 73 20 72 64 6d 6c 31 |py #9. b|cs rdml1|
|00001330| 31 0d 20 6c 64 61 20 23 | 24 32 39 0d 20 6a 73 72 |1. lda #|$29. jsr|
|00001340| 20 62 73 6f 75 74 0d 72 | 64 6d 6c 31 31 20 63 70 | bsout.r|dml11 cp|
|00001350| 79 20 23 35 0d 20 62 65 | 71 20 72 64 6d 6c 31 32 |y #5. be|q rdml12|
|00001360| 0d 20 63 70 79 20 23 37 | 20 3b 49 46 a0 41 44 44 |. cpy #7| ;IF.ADD|
|00001370| 52 a0 35 2c 37 a0 4f 52 | a0 31 30 a0 50 52 49 4e |R.5,7.OR|.10.PRIN|
|00001380| 54 54 a0 27 2c 79 0d 20 | 62 65 71 20 72 64 6d 6c |TT.',y. |beq rdml|
|00001390| 31 32 0d 20 63 70 79 20 | 23 31 30 0d 20 62 6e 65 |12. cpy |#10. bne|
|000013a0| 20 72 64 6d 6c 31 33 0d | 72 64 6d 6c 31 32 20 6c | rdml13.|rdml12 l|
|000013b0| 64 61 20 23 24 32 63 0d | 20 6a 73 72 20 62 73 6f |da #$2c.| jsr bso|
|000013c0| 75 74 0d 20 6c 64 61 20 | 23 24 35 39 0d 20 6a 73 |ut. lda |#$59. js|
|000013d0| 72 20 62 73 6f 75 74 0d | 2a 0d 2a 0d 2a 0d 72 64 |r bsout.|*.*.*.rd|
|000013e0| 6d 6c 31 33 20 63 6c 63 | 20 20 3b 54 41 42 28 33 |ml13 clc|  ;TAB(3|
|000013f0| 35 29 a0 55 53 49 4e 47 | 0d 20 6c 64 78 20 24 64 |5).USING|. ldx $d|
|00001400| 36 0d 20 6c 64 79 20 23 | 33 30 20 3b 4b 45 52 4e |6. ldy #|30 ;KERN|
|00001410| 41 4c a0 70 6c 6f 74 a0 | 52 4f 55 54 49 4e 45 0d |AL.plot.|ROUTINE.|
|00001420| 20 6a 73 72 20 24 66 66 | 66 30 0d 20 6c 64 61 20 | jsr $ff|f0. lda |
|00001430| 23 3c 73 74 72 69 6e 67 | 20 3b 50 52 49 4e 54 a0 |#<string| ;PRINT.|
|00001440| 43 48 41 52 2d 53 54 52 | 49 4e 47 0d 20 6c 64 79 |CHAR-STR|ING. ldy|
|00001450| 20 23 3e 73 74 72 69 6e | 67 0d 20 6a 73 72 20 70 | #>strin|g. jsr p|
|00001460| 72 74 73 74 67 0d 20 6a | 73 72 20 63 72 31 20 3b |rtstg. j|sr cr1 ;|
|00001470| 43 41 52 52 49 41 47 45 | a0 52 45 54 55 52 4e 0d |CARRIAGE|.RETURN.|
|00001480| 20 6a 6d 70 20 72 64 6d | 6c 30 20 3b 53 54 41 52 | jmp rdm|l0 ;STAR|
|00001490| 54 a0 41 4e 45 57 0d 2a | 0d 2a 0d 2a a0 64 65 63 |T.ANEW.*|.*.*.dec|
|000014a0| 6f 64 65 a0 62 72 61 6e | 63 68 0d 2a 0d 62 72 61 |ode.bran|ch.*.bra|
|000014b0| 6e 63 68 20 6c 64 61 20 | 24 66 65 20 3b 44 45 43 |nch lda |$fe ;DEC|
|000014c0| 4f 44 45 a0 42 52 41 4e | 43 48 0d 20 70 68 70 0d |ODE.BRAN|CH. php.|
|000014d0| 20 63 6c 63 0d 20 61 64 | 63 20 24 66 62 20 3b 42 | clc. ad|c $fb ;B|
|000014e0| 52 41 4e 43 48 a0 41 44 | 44 52 a0 3d a0 49 4e 44 |RANCH.AD|DR.=.IND|
|000014f0| 2b 31 2b 42 52 41 4e 43 | 48 a0 43 4f 44 45 0d 20 |+1+BRANC|H.CODE. |
|00001500| 73 74 61 20 24 66 65 0d | 20 6c 64 61 20 24 66 63 |sta $fe.| lda $fc|
|00001510| 0d 20 61 64 63 20 23 30 | 0d 20 73 74 61 20 24 66 |. adc #0|. sta $f|
|00001520| 66 0d 20 70 6c 70 0d 20 | 62 70 6c 20 72 64 6d 6c |f. plp. |bpl rdml|
|00001530| 37 20 3b 49 46 a0 3e 3d | 31 32 38 a0 54 48 45 4e |7 ;IF.>=|128.THEN|
|00001540| a0 42 52 41 4e 43 48 3d | 41 44 44 52 a0 2d a0 32 |.BRANCH=|ADDR.-.2|
|00001550| 35 36 0d 20 64 65 63 20 | 24 66 66 0d 20 63 6c 63 |56. dec |$ff. clc|
|00001560| 0d 20 62 63 63 20 72 64 | 6d 6c 37 0d 2a 0d 2a 0d |. bcc rd|ml7.*.*.|
|00001570| 69 6e 69 74 73 74 67 20 | 6c 64 78 20 23 33 0d 20 |initstg |ldx #3. |
|00001580| 6c 64 79 20 23 30 20 3b | 49 4e 49 54 49 41 4c 49 |ldy #0 ;|INITIALI|
|00001590| 5a 45 a0 53 54 52 49 4e | 47 0d 20 73 74 79 20 73 |ZE.STRIN|G. sty s|
|000015a0| 74 72 69 6e 67 2b 33 0d | 20 6c 64 61 20 23 27 2e |tring+3.| lda #'.|
|000015b0| 0d 69 6e 69 74 31 20 73 | 74 61 20 73 74 72 69 6e |.init1 s|ta strin|
|000015c0| 67 2c 79 0d 20 69 6e 79 | 0d 20 64 65 78 0d 20 62 |g,y. iny|. dex. b|
|000015d0| 6e 65 20 69 6e 69 74 31 | 0d 20 72 74 73 0d 2a 0d |ne init1|. rts.*.|
|000015e0| 2a 0d 73 74 6f 72 65 73 | 74 67 20 70 68 61 20 20 |*.stores|tg pha  |
|000015f0| 3b 53 41 56 45 a0 41 43 | 43 55 4d 55 4c 41 54 4f |;SAVE.AC|CUMULATO|
|00001600| 52 0d 20 63 6d 70 20 23 | 24 32 30 20 3b 49 46 a0 |R. cmp #|$20 ;IF.|
|00001610| 4e 4f 54 a0 50 52 49 4e | 54 41 42 4c 45 a0 53 4b |NOT.PRIN|TABLE.SK|
|00001620| 49 50 a0 49 54 0d 20 62 | 63 63 20 73 74 6f 72 65 |IP.IT. b|cc store|
|00001630| 6e 64 0d 20 63 6d 70 20 | 23 24 38 30 0d 20 62 63 |nd. cmp |#$80. bc|
|00001640| 63 20 73 74 6f 72 31 0d | 20 63 6d 70 20 23 24 61 |c stor1.| cmp #$a|
|00001650| 30 0d 20 62 63 63 20 73 | 74 6f 72 65 6e 64 0d 73 |0. bcc s|torend.s|
|00001660| 74 6f 72 31 20 73 74 61 | 20 73 74 72 69 6e 67 2c |tor1 sta| string,|
|00001670| 79 0d 73 74 6f 72 65 6e | 64 20 70 6c 61 0d 20 72 |y.storen|d pla. r|
|00001680| 74 73 0d 2a 0d 2a 0d 2a | 0d 2a 0d 2a 0d 2a a0 72 |ts.*.*.*|.*.*.*.r|
|00001690| 45 41 44 a0 62 41 53 49 | 43 a0 50 52 4f 47 52 41 |EAD.bASI|C.PROGRA|
|000016a0| 4d 0d 2a 0d 72 64 62 61 | 73 20 63 6c 63 0d 20 6a |M.*.rdba|s clc. j|
|000016b0| 73 72 20 67 65 74 62 79 | 74 65 20 3b 52 45 41 44 |sr getby|te ;READ|
|000016c0| a0 50 52 47 a0 53 54 41 | 52 54 a0 41 44 44 52 0d |.PRG.STA|RT.ADDR.|
|000016d0| 20 73 74 61 20 24 66 62 | 0d 20 6a 73 72 20 67 65 | sta $fb|. jsr ge|
|000016e0| 74 62 79 74 65 0d 20 73 | 74 61 20 24 66 63 0d 20 |tbyte. s|ta $fc. |
|000016f0| 6c 64 61 20 23 3c 61 64 | 64 72 0d 20 6c 64 79 20 |lda #<ad|dr. ldy |
|00001700| 23 3e 61 64 64 72 0d 20 | 6a 73 72 20 70 72 74 73 |#>addr. |jsr prts|
|00001710| 74 67 0d 20 6c 64 78 20 | 24 66 62 0d 20 6c 64 61 |tg. ldx |$fb. lda|
|00001720| 20 24 66 63 0d 20 6a 73 | 72 20 63 6f 6e 76 65 72 | $fc. js|r conver|
|00001730| 74 20 3b 50 52 49 4e 54 | a0 4f 55 54 a0 53 54 41 |t ;PRINT|.OUT.STA|
|00001740| 52 54 a0 41 44 44 52 45 | 53 53 0d 20 6a 73 72 20 |RT.ADDRE|SS. jsr |
|00001750| 63 72 20 3b 43 41 52 52 | 49 41 47 45 a0 52 45 54 |cr ;CARR|IAGE.RET|
|00001760| 55 52 4e 0d 72 64 62 61 | 73 31 20 6c 64 61 20 23 |URN.rdba|s1 lda #|
|00001770| 30 0d 20 73 74 61 20 71 | 75 6f 74 65 0d 20 6a 73 |0. sta q|uote. js|
|00001780| 72 20 63 72 31 20 3b 53 | 54 41 52 54 a0 4e 45 57 |r cr1 ;S|TART.NEW|
|00001790| a0 4c 49 4e 45 0d 20 6a | 73 72 20 67 65 74 62 79 |.LINE. j|sr getby|
|000017a0| 74 65 20 3b 47 45 54 a0 | 4c 49 4e 4b 45 52 a0 46 |te ;GET.|LINKER.F|
|000017b0| 49 52 53 54 a0 42 59 54 | 45 0d 20 6a 73 72 20 67 |IRST.BYT|E. jsr g|
|000017c0| 65 74 62 79 74 65 20 3b | 47 45 54 a0 32 4e 44 a0 |etbyte ;|GET.2ND.|
|000017d0| 42 59 54 45 0d 20 63 6d | 70 20 23 30 20 3b 49 46 |BYTE. cm|p #0 ;IF|
|000017e0| a0 5a 45 52 4f a0 54 48 | 45 4e a0 45 4e 44 a0 4f |.ZERO.TH|EN.END.O|
|000017f0| 46 a0 46 49 4c 45 0d 20 | 62 65 71 20 65 6f 66 0d |F.FILE. |beq eof.|
|00001800| 2a 0d 20 6a 73 72 20 63 | 68 6b 6b 65 79 20 3b 61 |*. jsr c|hkkey ;a|
|00001810| 4e 59 a0 4b 45 59 a0 50 | 52 45 53 53 45 44 3f 0d |NY.KEY.P|RESSED?.|
|00001820| 20 6a 73 72 20 63 68 6b | 6c 69 6e 65 20 3b 4c 41 | jsr chk|line ;LA|
|00001830| 53 54 a0 53 43 52 45 45 | 4e a0 4c 49 4e 45 3f 0d |ST.SCREE|N.LINE?.|
|00001840| 20 6a 73 72 20 67 65 74 | 62 79 74 65 20 3b 47 45 | jsr get|byte ;GE|
|00001850| 54 a0 46 49 52 53 54 a0 | 42 59 54 45 a0 4f 46 a0 |T.FIRST.|BYTE.OF.|
|00001860| 4c 49 4e 45 a0 4e 55 4d | 42 45 52 0d 20 73 74 61 |LINE.NUM|BER. sta|
|00001870| 20 24 66 62 0d 20 6a 73 | 72 20 67 65 74 62 79 74 | $fb. js|r getbyt|
|00001880| 65 20 3b 47 45 54 a0 53 | 45 43 4f 4e 44 a0 42 59 |e ;GET.S|ECOND.BY|
|00001890| 54 45 a0 4f 46 a0 4c 49 | 4e 45 a0 4e 55 4d 42 45 |TE.OF.LI|NE.NUMBE|
|000018a0| 52 0d 20 73 74 61 20 24 | 66 63 0d 20 6c 64 78 20 |R. sta $|fc. ldx |
|000018b0| 24 66 62 0d 20 6c 64 61 | 20 24 66 63 0d 20 6a 73 |$fb. lda| $fc. js|
|000018c0| 72 20 63 6f 6e 76 65 72 | 74 20 3b 50 52 49 4e 54 |r conver|t ;PRINT|
|000018d0| a0 4f 55 54 a0 4c 49 4e | 45 a0 4e 52 0d 20 6c 64 |.OUT.LIN|E.NR. ld|
|000018e0| 61 20 23 24 32 30 20 3b | 53 50 41 43 45 0d 20 6a |a #$20 ;|SPACE. j|
|000018f0| 73 72 20 62 73 6f 75 74 | 0d 72 64 62 61 73 32 20 |sr bsout|.rdbas2 |
|00001900| 6a 73 72 20 67 65 74 62 | 79 74 65 20 3b 52 45 54 |jsr getb|yte ;RET|
|00001910| 52 49 45 56 45 a0 4f 4e | 45 a0 42 59 54 45 a0 46 |RIEVE.ON|E.BYTE.F|
|00001920| 4d a0 44 49 53 4b 0d 20 | 63 6d 70 20 23 30 20 3b |M.DISK. |cmp #0 ;|
|00001930| 45 4e 44 2d 4f 46 2d 4c | 49 4e 45 3f 0d 20 62 6e |END-OF-L|INE?. bn|
|00001940| 65 20 72 64 62 61 73 33 | 0d 20 6a 6d 70 20 72 64 |e rdbas3|. jmp rd|
|00001950| 62 61 73 31 0d 2a 0d 72 | 64 62 61 73 33 20 62 70 |bas1.*.r|dbas3 bp|
|00001960| 6c 20 72 64 62 61 73 37 | 20 3b 4e 4f a0 69 4e 54 |l rdbas7| ;NO.iNT|
|00001970| 45 52 50 52 45 54 45 52 | 2d 63 4f 44 45 2c 54 48 |ERPRETER|-cODE,TH|
|00001980| 45 4e a0 50 52 49 4e 54 | 0d 20 63 6d 70 20 23 24 |EN.PRINT|. cmp #$|
|00001990| 66 66 20 3b 43 4f 44 45 | a0 46 4f 52 a0 70 69 0d |ff ;CODE|.FOR.pi.|
|000019a0| 20 62 65 71 20 72 64 62 | 61 73 37 20 3b 54 48 45 | beq rdb|as7 ;THE|
|000019b0| 4e a0 50 52 49 4e 54 a0 | 49 54 0d 20 62 69 74 20 |N.PRINT.|IT. bit |
|000019c0| 71 75 6f 74 65 20 3b 71 | 55 4f 54 45 2d 46 4c 41 |quote ;q|UOTE-FLA|
|000019d0| 47 a0 4f 4e 3f 0d 20 62 | 6d 69 20 72 64 62 61 73 |G.ON?. b|mi rdbas|
|000019e0| 37 20 3b 49 46 a0 53 4f | a0 50 52 49 4e 54 a0 43 |7 ;IF.SO|.PRINT.C|
|000019f0| 4f 44 45 a0 41 53 a0 49 | 53 0d 20 73 65 63 0d 20 |ODE.AS.I|S. sec. |
|00001a00| 73 62 63 20 23 24 37 66 | 20 3b 53 55 42 54 52 41 |sbc #$7f| ;SUBTRA|
|00001a10| 43 54 a0 4f 46 46 53 45 | 54 0d 20 74 61 78 20 20 |CT.OFFSE|T. tax  |
|00001a20| 3b 55 53 45 a0 43 4f 44 | 45 a0 41 53 a0 50 4f 49 |;USE.COD|E.AS.POI|
|00001a30| 4e 54 45 52 0d 20 6c 64 | 79 20 23 24 66 66 0d 72 |NTER. ld|y #$ff.r|
|00001a40| 64 62 61 73 34 20 64 65 | 78 20 20 3b 46 49 52 53 |dbas4 de|x  ;FIRS|
|00001a50| 54 a0 63 4f 44 45 2d 57 | 4f 52 44 3f 0d 20 62 65 |T.cODE-W|ORD?. be|
|00001a60| 71 20 72 64 62 61 73 36 | 0d 72 64 62 61 73 35 20 |q rdbas6|.rdbas5 |
|00001a70| 69 6e 79 0d 20 6c 64 61 | 20 24 61 30 39 65 2c 79 |iny. lda| $a09e,y|
|00001a80| 20 3b 46 49 4e 44 a0 4f | 46 46 53 45 54 a0 46 4f | ;FIND.O|FFSET.FO|
|00001a90| 52 a0 58 a0 43 4f 44 45 | 0d 20 62 70 6c 20 72 64 |R.X.CODE|. bpl rd|
|00001aa0| 62 61 73 35 0d 20 62 6d | 69 20 72 64 62 61 73 34 |bas5. bm|i rdbas4|
|00001ab0| 20 3b 42 49 54 a0 37 a0 | 53 45 54 2c a0 4e 45 58 | ;BIT.7.|SET,.NEX|
|00001ac0| 54 a0 57 4f 52 44 0d 72 | 64 62 61 73 36 20 69 6e |T.WORD.r|dbas6 in|
|00001ad0| 79 0d 20 6c 64 61 20 24 | 61 30 39 65 2c 79 20 3b |y. lda $|a09e,y ;|
|00001ae0| 47 45 54 a0 43 4f 44 45 | 2d 57 4f 52 44 a0 46 52 |GET.CODE|-WORD.FR|
|00001af0| 4f 4d a0 54 41 42 4c 45 | 0d 20 62 6d 69 20 72 64 |OM.TABLE|. bmi rd|
|00001b00| 62 61 73 31 30 20 3b 4c | 41 53 54 a0 43 48 41 52 |bas10 ;L|AST.CHAR|
|00001b10| 41 43 54 45 52 2c a0 54 | 48 45 4e a0 45 4e 44 0d |ACTER,.T|HEN.END.|
|00001b20| 20 6a 73 72 20 62 73 6f | 75 74 20 3b 50 52 49 4e | jsr bso|ut ;PRIN|
|00001b30| 54 a0 4f 55 54 a0 43 48 | 41 52 41 43 54 45 52 0d |T.OUT.CH|ARACTER.|
|00001b40| 20 62 6e 65 20 72 64 62 | 61 73 36 20 3b 4c 4f 4f | bne rdb|as6 ;LOO|
|00001b50| 4b a0 46 4f 52 a0 4e 45 | 58 54 a0 43 48 41 52 41 |K.FOR.NE|XT.CHARA|
|00001b60| 43 54 45 52 0d 72 64 62 | 61 73 37 20 6a 73 72 20 |CTER.rdb|as7 jsr |
|00001b70| 62 73 6f 75 74 0d 20 63 | 6d 70 20 23 24 32 32 20 |bsout. c|mp #$22 |
|00001b80| 3b 51 55 4f 54 45 a0 4d | 4f 44 45 3f 0d 20 62 6e |;QUOTE.M|ODE?. bn|
|00001b90| 65 20 72 64 62 61 73 38 | 0d 20 6c 64 61 20 71 75 |e rdbas8|. lda qu|
|00001ba0| 6f 74 65 20 3b 49 4e 56 | 45 52 54 a0 51 55 4f 54 |ote ;INV|ERT.QUOT|
|00001bb0| 45 a0 46 4c 41 47 0d 20 | 65 6f 72 20 23 24 66 66 |E.FLAG. |eor #$ff|
|00001bc0| 0d 20 73 74 61 20 71 75 | 6f 74 65 0d 72 64 62 61 |. sta qu|ote.rdba|
|00001bd0| 73 38 20 6a 6d 70 20 72 | 64 62 61 73 32 0d 20 6a |s8 jmp r|dbas2. j|
|00001be0| 73 72 20 62 73 6f 75 74 | 0d 20 6a 6d 70 20 72 64 |sr bsout|. jmp rd|
|00001bf0| 62 61 73 32 20 3b 52 45 | 54 52 49 45 56 45 a0 4e |bas2 ;RE|TRIEVE.N|
|00001c00| 45 58 54 a0 42 59 54 45 | 0d 72 64 62 61 73 31 30 |EXT.BYTE|.rdbas10|
|00001c10| 20 61 6e 64 20 23 24 37 | 66 20 3b 0d 20 6a 73 72 | and #$7|f ;. jsr|
|00001c20| 20 62 73 6f 75 74 20 3b | 50 52 49 4e 54 a0 4f 55 | bsout ;|PRINT.OU|
|00001c30| 54 a0 4e 4f 52 4d 41 4c | a0 43 48 41 52 0d 20 6a |T.NORMAL|.CHAR. j|
|00001c40| 6d 70 20 72 64 62 61 73 | 32 0d 2a 0d 2a 0d 2a 0d |mp rdbas|2.*.*.*.|
|00001c50| 2a 0d 65 6f 66 20 6a 73 | 72 20 63 72 20 3b 43 41 |*.eof js|r cr ;CA|
|00001c60| 52 52 49 41 47 45 a0 52 | 45 54 55 52 4e 0d 20 6c |RRIAGE.R|ETURN. l|
|00001c70| 64 61 20 23 3c 65 6f 66 | 69 6c 65 0d 20 6c 64 79 |da #<eof|ile. ldy|
|00001c80| 20 23 3e 65 6f 66 69 6c | 65 0d 20 6a 73 72 20 70 | #>eofil|e. jsr p|
|00001c90| 72 74 73 74 67 0d 20 6a | 73 72 20 63 6c 73 66 69 |rtstg. j|sr clsfi|
|00001ca0| 6c 65 0d 65 6f 66 31 20 | 6a 73 72 20 67 65 74 69 |le.eof1 |jsr geti|
|00001cb0| 6e 0d 20 62 65 71 20 65 | 6f 66 31 0d 20 6a 6d 70 |n. beq e|of1. jmp|
|00001cc0| 20 6d 65 6e 75 0d 2a 0d | 2a 0d 63 68 6b 6b 65 79 | menu.*.|*.chkkey|
|00001cd0| 20 6a 73 72 20 73 74 6f | 70 0d 20 62 6e 65 20 63 | jsr sto|p. bne c|
|00001ce0| 68 6b 6b 65 79 31 0d 20 | 70 6c 61 20 20 3b 43 41 |hkkey1. |pla  ;CA|
|00001cf0| 4e 43 45 4c a0 52 45 54 | 55 52 4e a0 41 44 44 52 |NCEL.RET|URN.ADDR|
|00001d00| 45 53 53 a0 46 52 4f 4d | a0 53 54 41 43 4b 0d 20 |ESS.FROM|.STACK. |
|00001d10| 70 6c 61 0d 20 6a 73 72 | 20 63 6c 73 66 69 6c 65 |pla. jsr| clsfile|
|00001d20| 0d 20 6a 6d 70 20 6d 65 | 6e 75 0d 63 68 6b 6b 65 |. jmp me|nu.chkke|
|00001d30| 79 31 20 72 74 73 0d 2a | 0d 2a 0d 2a 0d 2a a0 63 |y1 rts.*|.*.*.*.c|
|00001d40| 68 65 63 6b a0 49 46 a0 | 45 4e 44 a0 4f 46 a0 53 |heck.IF.|END.OF.S|
|00001d50| 43 52 45 45 4e 0d 2a 0d | 63 68 6b 6c 69 6e 65 20 |CREEN.*.|chkline |
|00001d60| 63 6c 63 0d 20 6c 64 61 | 20 24 64 36 20 3b 43 55 |clc. lda| $d6 ;CU|
|00001d70| 52 52 45 4e 54 a0 53 43 | 52 45 45 4e a0 4c 49 4e |RRENT.SC|REEN.LIN|
|00001d80| 45 a0 41 44 44 52 45 53 | 53 0d 20 63 6d 70 20 73 |E.ADDRES|S. cmp s|
|00001d90| 63 72 6e 6c 69 6e 65 20 | 3b 4c 41 53 54 a0 53 43 |crnline |;LAST.SC|
|00001da0| 52 45 45 4e a0 4c 49 4e | 45 3f 0d 20 62 63 73 20 |REEN.LIN|E?. bcs |
|00001db0| 63 68 6b 6c 69 6e 65 32 | 0d 20 72 74 73 0d 63 68 |chkline2|. rts.ch|
|00001dc0| 6b 6c 69 6e 65 32 20 63 | 6c 63 0d 20 6a 73 72 20 |kline2 c|lc. jsr |
|00001dd0| 67 65 74 69 6e 20 3b 41 | 4e 59 a0 4b 45 59 53 a0 |getin ;A|NY.KEYS.|
|00001de0| 50 52 45 53 53 45 44 3f | 0d 20 62 65 71 20 63 68 |PRESSED?|. beq ch|
|00001df0| 6b 6c 69 6e 65 32 0d 20 | 6a 73 72 20 63 6c 72 73 |kline2. |jsr clrs|
|00001e00| 63 6e 20 3b 43 4c 45 41 | 52 a0 53 43 52 45 45 4e |cn ;CLEA|R.SCREEN|
|00001e10| a0 41 4e 44 a0 53 54 41 | 52 54 a0 4e 45 57 a0 50 |.AND.STA|RT.NEW.P|
|00001e20| 41 47 45 0d 20 63 6c 63 | 0d 20 6c 64 61 20 23 30 |AGE. clc|. lda #0|
|00001e30| 0d 20 73 74 61 20 31 39 | 38 20 3b 52 45 53 45 54 |. sta 19|8 ;RESET|
|00001e40| a0 4b 45 59 42 4f 41 52 | 44 a0 42 55 46 46 45 52 |.KEYBOAR|D.BUFFER|
|00001e50| 0d 20 72 74 73 0d 2a 0d | 2a 0d 2a 0d 63 72 20 6c |. rts.*.|*.*.cr l|
|00001e60| 64 61 20 23 31 33 0d 20 | 6a 73 72 20 62 73 6f 75 |da #13. |jsr bsou|
|00001e70| 74 20 3b 50 52 49 4e 54 | a0 32 a0 43 41 52 52 49 |t ;PRINT|.2.CARRI|
|00001e80| 41 47 45 a0 52 45 54 55 | 52 4e 0d 63 72 31 20 6c |AGE.RETU|RN.cr1 l|
|00001e90| 64 61 20 23 31 33 20 3b | 0d 20 6a 6d 70 20 62 73 |da #13 ;|. jmp bs|
|00001ea0| 6f 75 74 0d 2a 0d 2a 0d | 2a 0d 2a 0d 2a a0 64 6c |out.*.*.|*.*.*.dl|
|00001eb0| 69 73 74 a0 53 48 4f 57 | 53 a0 44 49 52 45 43 54 |ist.SHOW|S.DIRECT|
|00001ec0| 4f 52 59 a0 4f 46 a0 54 | 48 45 a0 44 49 53 4b 0d |ORY.OF.T|HE.DISK.|
|00001ed0| 2a a0 57 49 54 48 4f 55 | 54 a0 44 49 53 54 55 52 |*.WITHOU|T.DISTUR|
|00001ee0| 42 49 4e 47 a0 4d 45 4d | 4f 52 59 0d 2a 0d 64 6c |BING.MEM|ORY.*.dl|
|00001ef0| 69 73 74 20 6a 73 72 20 | 63 6c 72 73 63 6e 0d 20 |ist jsr |clrscn. |
|00001f00| 6c 64 61 20 23 30 0d 20 | 73 74 61 20 73 74 61 74 |lda #0. |sta stat|
|00001f10| 75 73 0d 20 6c 64 61 20 | 23 3c 64 6c 0d 20 73 74 |us. lda |#<dl. st|
|00001f20| 61 20 66 6e 61 64 64 72 | 0d 20 6c 64 61 20 23 3e |a fnaddr|. lda #>|
|00001f30| 64 6c 0d 20 73 74 61 20 | 66 6e 61 64 64 72 2b 31 |dl. sta |fnaddr+1|
|00001f40| 0d 20 6c 64 61 20 23 31 | 0d 20 73 74 61 20 66 6e |. lda #1|. sta fn|
|00001f50| 6c 65 6e 67 0d 20 6c 64 | 61 20 23 38 0d 20 73 74 |leng. ld|a #8. st|
|00001f60| 61 20 64 65 76 6e 75 6d | 0d 20 6c 64 61 20 23 24 |a devnum|. lda #$|
|00001f70| 36 30 0d 20 73 74 61 20 | 73 65 63 61 64 72 0d 20 |60. sta |secadr. |
|00001f80| 6a 73 72 20 73 65 6e 64 | 66 6e 0d 20 6c 64 61 20 |jsr send|fn. lda |
|00001f90| 64 65 76 6e 75 6d 0d 20 | 6a 73 72 20 69 65 63 74 |devnum. |jsr iect|
|00001fa0| 61 6c 6b 0d 20 6c 64 61 | 20 73 65 63 61 64 72 0d |alk. lda| secadr.|
|00001fb0| 20 6a 73 72 20 73 65 6e | 64 73 65 63 0d 20 6c 64 | jsr sen|dsec. ld|
|00001fc0| 79 20 73 74 61 74 75 73 | 0d 20 62 6e 65 20 64 6c |y status|. bne dl|
|00001fd0| 69 73 74 34 0d 20 6c 64 | 79 20 23 36 0d 64 6c 69 |ist4. ld|y #6.dli|
|00001fe0| 73 74 31 20 73 74 79 20 | 74 6d 70 0d 20 6a 73 72 |st1 sty |tmp. jsr|
|00001ff0| 20 69 65 63 69 6e 70 0d | 20 6c 64 78 20 74 6d 70 | iecinp.| ldx tmp|
|00002000| 2b 31 0d 20 73 74 61 20 | 74 6d 70 2b 31 0d 20 6c |+1. sta |tmp+1. l|
|00002010| 64 79 20 73 74 61 74 75 | 73 0d 20 62 6e 65 20 64 |dy statu|s. bne d|
|00002020| 6c 69 73 74 34 0d 20 6c | 64 79 20 74 6d 70 0d 20 |list4. l|dy tmp. |
|00002030| 64 65 79 0d 20 62 6e 65 | 20 64 6c 69 73 74 31 0d |dey. bne| dlist1.|
|00002040| 20 6c 64 79 20 74 6d 70 | 2b 31 0d 20 6a 73 72 20 | ldy tmp|+1. jsr |
|00002050| 6c 69 6e 65 70 72 74 20 | 3b 50 52 49 4e 54 a0 4c |lineprt |;PRINT.L|
|00002060| 49 4e 45 0d 20 6c 64 61 | 20 23 24 32 30 20 3b 53 |INE. lda| #$20 ;S|
|00002070| 50 41 43 45 0d 20 6a 73 | 72 20 62 73 6f 75 74 0d |PACE. js|r bsout.|
|00002080| 64 6c 69 73 74 33 20 6a | 73 72 20 69 65 63 69 6e |dlist3 j|sr iecin|
|00002090| 70 0d 20 6c 64 78 20 73 | 74 61 74 75 73 0d 20 62 |p. ldx s|tatus. b|
|000020a0| 6e 65 20 64 6c 69 73 74 | 34 0d 20 74 61 78 0d 20 |ne dlist|4. tax. |
|000020b0| 62 65 71 20 64 6c 69 73 | 74 32 0d 20 6a 73 72 20 |beq dlis|t2. jsr |
|000020c0| 62 73 6f 75 74 0d 20 6a | 6d 70 20 64 6c 69 73 74 |bsout. j|mp dlist|
|000020d0| 33 0d 64 6c 69 73 74 32 | 20 6a 73 72 20 63 72 31 |3.dlist2| jsr cr1|
|000020e0| 20 3b 43 41 52 52 49 41 | 47 45 a0 52 45 54 55 52 | ;CARRIA|GE.RETUR|
|000020f0| 4e 0d 20 6c 64 79 20 23 | 34 0d 20 62 6e 65 20 64 |N. ldy #|4. bne d|
|00002100| 6c 69 73 74 31 0d 64 6c | 69 73 74 34 20 6a 73 72 |list1.dl|ist4 jsr|
|00002110| 20 63 6c 6f 73 66 69 6c | 0d 20 6a 6d 70 20 65 6f | closfil|. jmp eo|
|00002120| 66 31 20 3b 57 41 49 54 | a0 46 4f 52 a0 41 a0 4b |f1 ;WAIT|.FOR.A.K|
|00002130| 45 59 a0 54 4f a0 42 45 | a0 50 52 45 53 53 45 44 |EY.TO.BE|.PRESSED|
|00002140| 0d 2a 0d 2a 0d 2a 0d 74 | 69 74 6c 65 20 61 73 63 |.*.*.*.t|itle asc|
|00002150| 20 27 a0 a0 a0 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 66 | '......|.......f|
|00002160| 69 6c 65 a0 65 78 61 6d | 69 6e 65 72 27 0d 20 64 |ile.exam|iner'. d|
|00002170| 66 62 20 31 33 0d 20 61 | 73 63 20 27 a0 a0 a0 a0 |fb 13. a|sc '....|
|00002180| a0 a0 a0 a0 a0 a0 a0 62 | 79 a0 70 61 6f 6c 6f a0 |.......b|y.paolo.|
|00002190| 61 67 6f 73 74 69 6e 69 | 27 0d 20 64 66 62 20 30 |agostini|'. dfb 0|
|000021a0| 0d 66 69 6c 65 20 61 73 | 63 20 27 a0 a0 3e a0 a0 |.file as|c '..>..|
|000021b0| 66 69 6c 65 a0 74 6f a0 | 64 69 73 70 6c 61 79 3a |file.to.|display:|
|000021c0| a0 a0 24 27 0d 20 64 66 | 62 20 31 35 37 2c 30 0d |..$'. df|b 157,0.|
|000021d0| 66 69 6c 74 79 70 65 20 | 61 73 63 20 27 a0 a0 a0 |filtype |asc '...|
|000021e0| a0 a0 a0 a0 a0 a0 a0 27 | 0d 20 64 66 62 20 31 38 |.......'|. dfb 18|
|000021f0| 2c 33 32 2c 34 39 2c 33 | 32 2c 31 34 36 2c 33 32 |,32,49,3|2,146,32|
|00002200| 0d 20 61 73 63 20 27 70 | 72 67 a0 66 69 6c 65 a0 |. asc 'p|rg.file.|
|00002210| 74 79 70 65 27 0d 20 64 | 66 62 20 31 33 2c 31 33 |type'. d|fb 13,13|
|00002220| 0d 20 61 73 63 20 27 a0 | a0 a0 a0 a0 a0 a0 a0 a0 |. asc '.|........|
|00002230| a0 27 0d 20 64 66 62 20 | 31 38 2c 33 32 2c 35 30 |.'. dfb |18,32,50|
|00002240| 2c 33 32 2c 31 34 36 2c | 33 32 0d 20 61 73 63 20 |,32,146,|32. asc |
|00002250| 27 73 65 71 a0 66 69 6c | 65 a0 74 79 70 65 27 0d |'seq.fil|e.type'.|
|00002260| 20 64 66 62 20 31 33 2c | 31 33 0d 20 61 73 63 20 | dfb 13,|13. asc |
|00002270| 27 a0 a0 a0 a0 a0 a0 a0 | a0 a0 a0 27 0d 20 64 66 |'.......|...'. df|
|00002280| 62 20 31 38 2c 33 32 2c | 35 31 2c 33 32 2c 31 34 |b 18,32,|51,32,14|
|00002290| 36 2c 33 32 0d 20 61 73 | 63 20 27 75 73 72 a0 66 |6,32. as|c 'usr.f|
|000022a0| 69 6c 65 a0 74 79 70 65 | 27 0d 20 64 66 62 20 31 |ile.type|'. dfb 1|
|000022b0| 33 2c 31 33 0d 20 61 73 | 63 20 27 a0 a0 3e a0 a0 |3,13. as|c '..>..|
|000022c0| 63 68 6f 6f 73 65 a0 66 | 69 6c 65 a0 74 79 70 65 |choose.f|ile.type|
|000022d0| a0 28 31 2d 33 29 27 0d | 20 64 66 62 20 31 33 2c |.(1-3)'.| dfb 13,|
|000022e0| 31 33 2c 31 33 2c 30 0d | 64 69 73 70 6c 61 79 20 |13,13,0.|display |
|000022f0| 61 73 63 20 27 a0 a0 a0 | a0 a0 a0 a0 a0 a0 a0 27 |asc '...|.......'|
|00002300| 0d 20 64 66 62 20 31 38 | 2c 36 36 2c 31 34 36 0d |. dfb 18|,66,146.|
|00002310| 20 61 73 63 20 27 61 73 | 69 63 a0 70 72 6f 67 72 | asc 'as|ic.progr|
|00002320| 61 6d a0 64 69 73 70 6c | 61 79 27 0d 20 64 66 62 |am.displ|ay'. dfb|
|00002330| 20 31 33 2c 31 33 0d 20 | 61 73 63 20 27 a0 a0 a0 | 13,13. |asc '...|
|00002340| a0 a0 a0 a0 a0 a0 a0 27 | 0d 20 64 66 62 20 31 38 |.......'|. dfb 18|
|00002350| 2c 37 37 2c 31 34 36 0d | 20 61 73 63 20 27 61 63 |,77,146.| asc 'ac|
|00002360| 68 69 6e 65 a0 6c 61 6e | 67 75 61 67 65 a0 70 72 |hine.lan|guage.pr|
|00002370| 67 a0 64 69 73 70 6c 61 | 79 27 0d 20 64 66 62 20 |g.displa|y'. dfb |
|00002380| 31 33 2c 31 33 0d 20 61 | 73 63 20 27 a0 a0 a0 a0 |13,13. a|sc '....|
|00002390| a0 a0 a0 a0 a0 a0 27 0d | 20 64 66 62 20 31 38 2c |......'.| dfb 18,|
|000023a0| 37 30 2c 31 34 36 0d 20 | 61 73 63 20 27 69 6c 65 |70,146. |asc 'ile|
|000023b0| 2d 6d 6f 64 65 a0 64 69 | 73 70 6c 61 79 27 0d 20 |-mode.di|splay'. |
|000023c0| 64 66 62 20 31 33 2c 31 | 33 0d 20 61 73 63 20 27 |dfb 13,1|3. asc '|
|000023d0| a0 a0 3e a0 a0 63 68 6f | 6f 73 65 a0 64 69 73 70 |..>..cho|ose.disp|
|000023e0| 6c 61 79 a0 6f 70 74 69 | 6f 6e a0 28 62 2f 6d 2f |lay.opti|on.(b/m/|
|000023f0| 66 29 27 0d 20 64 66 62 | 20 30 0d 72 64 69 6e 67 |f)'. dfb| 0.rding|
|00002400| 20 61 73 63 20 27 72 65 | 61 64 69 6e 67 a0 66 69 | asc 're|ading.fi|
|00002410| 6c 65 3a a0 27 0d 20 64 | 66 62 20 30 0d 61 64 64 |le:.'. d|fb 0.add|
|00002420| 72 20 61 73 63 20 27 73 | 74 61 72 74 a0 61 64 64 |r asc 's|tart.add|
|00002430| 72 65 73 73 3a a0 27 0d | 20 64 66 62 20 30 0d 65 |ress:.'.| dfb 0.e|
|00002440| 6f 66 69 6c 65 20 64 66 | 62 20 31 38 0d 20 61 73 |ofile df|b 18. as|
|00002450| 63 20 27 70 72 65 73 73 | a0 61 6e 79 a0 6b 65 79 |c 'press|.any.key|
|00002460| 2e 27 0d 20 64 66 62 20 | 31 34 36 2c 30 0d 64 6c |.'. dfb |146,0.dl|
|00002470| 20 61 73 63 20 27 24 27 | 0d 73 63 72 6e 6c 69 6e | asc '$'|.scrnlin|
|00002480| 65 20 64 66 62 20 30 0d | 69 30 20 61 73 63 20 27 |e dfb 0.|i0 asc '|
|00002490| 69 30 27 0d 74 6d 70 20 | 64 64 62 20 30 0d 68 65 |i0'.tmp |ddb 0.he|
|000024a0| 78 6c 69 6e 65 20 61 73 | 63 20 27 30 31 32 33 34 |xline as|c '01234|
|000024b0| 35 36 37 38 39 61 62 63 | 64 65 66 27 0d 73 74 72 |56789abc|def'.str|
|000024c0| 69 6e 67 20 64 66 62 20 | 30 2c 30 2c 30 2c 30 2c |ing dfb |0,0,0,0,|
|000024d0| 30 0d 2a 0d 2a 0d 63 6f | 64 69 73 20 68 65 78 20 |0.*.*.co|dis hex |
|000024e0| 32 31 2c 36 39 2c 30 30 | 2c 30 30 2c 30 30 2c 36 |21,69,00|,00,00,6|
|000024f0| 39 2c 30 39 2c 30 30 2c | 36 66 2c 36 39 2c 30 39 |9,09,00,|6f,69,09|
|00002500| 2c 30 30 2c 30 30 2c 36 | 39 2c 30 39 2c 30 30 0d |,00,00,6|9,09,00.|
|00002510| 20 68 65 78 20 31 65 2c | 36 39 2c 30 30 2c 30 30 | hex 1e,|69,00,00|
|00002520| 2c 30 30 2c 36 39 2c 30 | 39 2c 30 30 2c 32 61 2c |,00,69,0|9,00,2a,|
|00002530| 36 39 2c 30 30 2c 30 30 | 2c 30 30 2c 36 39 2c 30 |69,00,00|,00,69,0|
|00002540| 39 2c 30 30 0d 20 68 65 | 78 20 35 37 2c 30 36 2c |9,00. he|x 57,06,|
|00002550| 30 30 2c 30 30 2c 31 35 | 2c 30 36 2c 37 38 2c 30 |00,00,15|,06,78,0|
|00002560| 30 2c 37 35 2c 30 36 2c | 37 38 2c 30 30 2c 31 35 |0,75,06,|78,00,15|
|00002570| 2c 30 36 2c 37 38 2c 30 | 30 0d 20 68 65 78 20 31 |,06,78,0|0. hex 1|
|00002580| 38 2c 30 36 2c 30 30 2c | 30 30 2c 30 30 2c 30 36 |8,06,00,|00,00,06|
|00002590| 2c 37 38 2c 30 30 2c 38 | 37 2c 30 36 2c 30 30 2c |,78,00,8|7,06,00,|
|000025a0| 30 30 2c 30 30 2c 30 36 | 2c 37 38 2c 30 30 0d 20 |00,00,06|,78,00. |
|000025b0| 68 65 78 20 37 65 2c 34 | 38 2c 30 30 2c 30 30 2c |hex 7e,4|8,00,00,|
|000025c0| 30 30 2c 34 38 2c 36 33 | 2c 30 30 2c 36 63 2c 34 |00,48,63|,00,6c,4|
|000025d0| 38 2c 36 33 2c 30 30 2c | 35 34 2c 34 38 2c 36 33 |8,63,00,|54,48,63|
|000025e0| 2c 30 30 0d 20 68 65 78 | 20 32 34 2c 34 38 2c 30 |,00. hex| 24,48,0|
|000025f0| 30 2c 30 30 2c 30 30 2c | 34 38 2c 36 33 2c 30 30 |0,00,00,|48,63,00|
|00002600| 2c 33 30 2c 34 38 2c 30 | 30 2c 30 30 2c 30 30 2c |,30,48,0|0,00,00,|
|00002610| 34 38 2c 36 33 2c 30 30 | 0d 20 68 65 78 20 38 31 |48,63,00|. hex 81|
|00002620| 2c 30 33 2c 30 30 2c 30 | 30 2c 30 30 2c 30 33 2c |,03,00,0|0,00,03,|
|00002630| 37 62 2c 30 30 2c 37 32 | 2c 30 33 2c 37 62 2c 30 |7b,00,72|,03,7b,0|
|00002640| 30 2c 35 34 2c 30 33 2c | 37 62 2c 30 30 0d 20 68 |0,54,03,|7b,00. h|
|00002650| 65 78 20 32 37 2c 30 33 | 2c 30 30 2c 30 30 2c 30 |ex 27,03|,00,00,0|
|00002660| 30 2c 30 33 2c 37 62 2c | 30 30 2c 38 64 2c 30 33 |0,03,7b,|00,8d,03|
|00002670| 2c 30 30 2c 30 30 2c 30 | 30 2c 30 33 2c 37 62 2c |,00,00,0|0,03,7b,|
|00002680| 30 30 0d 20 68 65 78 20 | 30 30 2c 39 30 2c 30 30 |00. hex |00,90,00|
|00002690| 2c 30 30 2c 39 36 2c 39 | 30 2c 39 33 2c 30 30 2c |,00,96,9|0,93,00,|
|000026a0| 34 35 2c 30 30 2c 61 32 | 2c 30 30 2c 39 36 2c 39 |45,00,a2|,00,96,9|
|000026b0| 30 2c 39 33 2c 30 30 0d | 20 68 65 78 20 30 63 2c |0,93,00.| hex 0c,|
|000026c0| 39 30 2c 30 30 2c 30 30 | 2c 39 36 2c 39 30 2c 39 |90,00,00|,96,90,9|
|000026d0| 33 2c 30 30 2c 61 38 2c | 39 30 2c 61 35 2c 30 30 |3,00,a8,|90,a5,00|
|000026e0| 2c 30 30 2c 39 30 2c 30 | 30 2c 30 30 0d 20 68 65 |,00,90,0|0,00. he|
|000026f0| 78 20 36 30 2c 35 61 2c | 35 64 2c 30 30 2c 36 30 |x 60,5a,|5d,00,60|
|00002700| 2c 35 61 2c 35 64 2c 30 | 30 2c 39 63 2c 35 61 2c |,5a,5d,0|0,9c,5a,|
|00002710| 39 39 2c 30 30 2c 36 30 | 2c 35 61 2c 35 64 2c 30 |99,00,60|,5a,5d,0|
|00002720| 30 0d 20 68 65 78 20 30 | 66 2c 35 61 2c 30 30 2c |0. hex 0|f,5a,00,|
|00002730| 30 30 2c 36 30 2c 35 61 | 2c 35 64 2c 30 30 2c 33 |00,60,5a|,5d,00,3|
|00002740| 33 2c 35 61 2c 39 66 2c | 30 30 2c 36 30 2c 35 61 |3,5a,9f,|00,60,5a|
|00002750| 2c 35 64 2c 30 30 0d 20 | 68 65 78 20 33 63 2c 33 |,5d,00. |hex 3c,3|
|00002760| 36 2c 30 30 2c 30 30 2c | 33 63 2c 33 36 2c 33 66 |6,00,00,|3c,36,3f|
|00002770| 2c 30 30 2c 35 31 2c 33 | 36 2c 34 32 2c 30 30 2c |,00,51,3|6,42,00,|
|00002780| 33 63 2c 33 36 2c 33 66 | 2c 30 30 0d 20 68 65 78 |3c,36,3f|,00. hex|
|00002790| 20 31 62 2c 33 36 2c 30 | 30 2c 30 30 2c 30 30 2c | 1b,36,0|0,00,00,|
|000027a0| 33 36 2c 33 66 2c 30 30 | 2c 32 64 2c 33 36 2c 30 |36,3f,00|,2d,36,0|
|000027b0| 30 2c 30 30 2c 30 30 2c | 33 36 2c 33 66 2c 30 30 |0,00,00,|36,3f,00|
|000027c0| 0d 20 68 65 78 20 33 39 | 2c 38 34 2c 30 30 2c 30 |. hex 39|,84,00,0|
|000027d0| 30 2c 33 39 2c 38 34 2c | 34 62 2c 30 30 2c 34 65 |0,39,84,|4b,00,4e|
|000027e0| 2c 38 34 2c 36 36 2c 30 | 30 2c 33 39 2c 38 34 2c |,84,66,0|0,39,84,|
|000027f0| 34 62 2c 30 30 0d 20 68 | 65 78 20 31 32 2c 38 34 |4b,00. h|ex 12,84|
|00002800| 2c 30 30 2c 30 30 2c 30 | 30 2c 38 34 2c 34 62 2c |,00,00,0|0,84,4b,|
|00002810| 30 30 2c 38 61 2c 38 34 | 2c 30 30 2c 30 30 2c 30 |00,8a,84|,00,00,0|
|00002820| 30 2c 38 34 2c 34 62 2c | 30 30 0d 2a 0d 69 6e 64 |0,84,4b,|00.*.ind|
|00002830| 69 72 20 68 65 78 20 30 | 30 2c 30 36 2c 30 30 2c |ir hex 0|0,06,00,|
|00002840| 30 30 2c 30 30 2c 30 33 | 2c 30 33 2c 30 30 2c 30 |00,00,03|,03,00,0|
|00002850| 30 2c 30 31 2c 30 30 2c | 30 30 2c 30 30 2c 30 62 |0,01,00,|00,00,0b|
|00002860| 2c 30 62 2c 30 30 0d 20 | 68 65 78 20 30 32 2c 30 |,0b,00. |hex 02,0|
|00002870| 37 2c 30 30 2c 30 30 2c | 30 30 2c 30 34 2c 30 34 |7,00,00,|00,04,04|
|00002880| 2c 30 30 2c 30 30 2c 30 | 61 2c 30 30 2c 30 30 2c |,00,00,0|a,00,00,|
|00002890| 30 30 2c 30 39 2c 30 39 | 2c 30 30 0d 20 68 65 78 |00,09,09|,00. hex|
|000028a0| 20 30 62 2c 30 36 2c 30 | 30 2c 30 30 2c 30 33 2c | 0b,06,0|0,00,03,|
|000028b0| 30 33 2c 30 33 2c 30 30 | 2c 30 30 2c 30 31 2c 30 |03,03,00|,00,01,0|
|000028c0| 30 2c 30 30 2c 30 62 2c | 30 62 2c 30 62 2c 30 30 |0,00,0b,|0b,0b,00|
|000028d0| 0d 20 68 65 78 20 30 32 | 2c 30 37 2c 30 30 2c 30 |. hex 02|,07,00,0|
|000028e0| 30 2c 30 30 2c 30 34 2c | 30 34 2c 30 30 2c 30 30 |0,00,04,|04,00,00|
|000028f0| 2c 30 61 2c 30 30 2c 30 | 30 2c 30 30 2c 30 39 2c |,0a,00,0|0,00,09,|
|00002900| 30 39 2c 30 30 0d 20 68 | 65 78 20 30 30 2c 30 36 |09,00. h|ex 00,06|
|00002910| 2c 30 30 2c 30 30 2c 30 | 30 2c 30 33 2c 30 33 2c |,00,00,0|0,03,03,|
|00002920| 30 30 2c 30 30 2c 30 31 | 2c 30 30 2c 30 30 2c 30 |00,00,01|,00,00,0|
|00002930| 62 2c 30 62 2c 30 62 2c | 30 30 0d 20 68 65 78 20 |b,0b,0b,|00. hex |
|00002940| 30 32 2c 30 37 2c 30 30 | 2c 30 30 2c 30 30 2c 30 |02,07,00|,00,00,0|
|00002950| 34 2c 30 34 2c 30 30 2c | 30 30 2c 30 61 2c 30 30 |4,04,00,|00,0a,00|
|00002960| 2c 30 30 2c 30 30 2c 30 | 39 2c 30 39 2c 30 30 0d |,00,00,0|9,09,00.|
|00002970| 20 68 65 78 20 30 30 2c | 30 36 2c 30 30 2c 30 30 | hex 00,|06,00,00|
|00002980| 2c 30 30 2c 30 33 2c 30 | 33 2c 30 30 2c 30 30 2c |,00,03,0|3,00,00,|
|00002990| 30 31 2c 30 30 2c 30 30 | 2c 30 38 2c 30 62 2c 30 |01,00,00|,08,0b,0|
|000029a0| 62 2c 30 30 0d 20 68 65 | 78 20 30 32 2c 30 37 2c |b,00. he|x 02,07,|
|000029b0| 30 30 2c 30 30 2c 30 30 | 2c 30 34 2c 30 34 2c 30 |00,00,00|,04,04,0|
|000029c0| 30 2c 30 30 2c 30 61 2c | 30 30 2c 30 30 2c 30 30 |0,00,0a,|00,00,00|
|000029d0| 2c 30 39 2c 30 39 2c 30 | 30 0d 20 68 65 78 20 30 |,09,09,0|0. hex 0|
|000029e0| 30 2c 30 36 2c 30 30 2c | 30 30 2c 30 33 2c 30 33 |0,06,00,|00,03,03|
|000029f0| 2c 30 33 2c 30 30 2c 30 | 30 2c 30 30 2c 30 30 2c |,03,00,0|0,00,00,|
|00002a00| 30 30 2c 30 62 2c 30 62 | 2c 30 62 2c 30 30 0d 20 |00,0b,0b|,0b,00. |
|00002a10| 68 65 78 20 30 32 2c 30 | 37 2c 30 30 2c 30 30 2c |hex 02,0|7,00,00,|
|00002a20| 30 34 2c 30 34 2c 30 35 | 2c 30 30 2c 30 30 2c 30 |04,04,05|,00,00,0|
|00002a30| 61 2c 30 30 2c 30 30 2c | 30 30 2c 30 39 2c 30 30 |a,00,00,|00,09,00|
|00002a40| 2c 30 30 0d 20 68 65 78 | 20 30 31 2c 30 36 2c 30 |,00. hex| 01,06,0|
|00002a50| 31 2c 30 30 2c 30 33 2c | 30 33 2c 30 33 2c 30 30 |1,00,03,|03,03,00|
|00002a60| 2c 30 30 2c 30 31 2c 30 | 30 2c 30 30 2c 30 62 2c |,00,01,0|0,00,0b,|
|00002a70| 30 62 2c 30 62 2c 30 30 | 0d 20 68 65 78 20 30 32 |0b,0b,00|. hex 02|
|00002a80| 2c 30 37 2c 30 30 2c 30 | 30 2c 30 34 2c 30 34 2c |,07,00,0|0,04,04,|
|00002a90| 30 35 2c 30 30 2c 30 30 | 2c 30 61 2c 30 30 2c 30 |05,00,00|,0a,00,0|
|00002aa0| 30 2c 30 39 2c 30 39 2c | 30 61 2c 30 30 0d 20 68 |0,09,09,|0a,00. h|
|00002ab0| 65 78 20 30 31 2c 30 36 | 2c 30 30 2c 30 30 2c 30 |ex 01,06|,00,00,0|
|00002ac0| 33 2c 30 33 2c 30 33 2c | 30 30 2c 30 30 2c 30 31 |3,03,03,|00,00,01|
|00002ad0| 2c 30 30 2c 30 30 2c 30 | 62 2c 30 62 2c 30 62 2c |,00,00,0|b,0b,0b,|
|00002ae0| 30 30 0d 20 68 65 78 20 | 30 32 2c 30 37 2c 30 30 |00. hex |02,07,00|
|00002af0| 2c 30 30 2c 30 30 2c 30 | 34 2c 30 34 2c 30 30 2c |,00,00,0|4,04,00,|
|00002b00| 30 30 2c 30 61 2c 30 30 | 2c 30 30 2c 30 30 2c 30 |00,0a,00|,00,00,0|
|00002b10| 39 2c 30 39 2c 30 30 0d | 20 68 65 78 20 30 31 2c |9,09,00.| hex 01,|
|00002b20| 30 36 2c 30 30 2c 30 30 | 2c 30 33 2c 30 33 2c 30 |06,00,00|,03,03,0|
|00002b30| 33 2c 30 30 2c 30 30 2c | 30 31 2c 30 30 2c 30 30 |3,00,00,|01,00,00|
|00002b40| 2c 30 62 2c 30 62 2c 30 | 62 2c 30 30 0d 20 68 65 |,0b,0b,0|b,00. he|
|00002b50| 78 20 30 32 2c 30 37 2c | 30 30 2c 30 30 2c 30 30 |x 02,07,|00,00,00|
|00002b60| 2c 30 34 2c 30 34 2c 30 | 30 2c 30 30 2c 30 61 2c |,04,04,0|0,00,0a,|
|00002b70| 30 30 2c 30 30 2c 30 30 | 2c 30 39 2c 30 39 2c 30 |00,00,00|,09,09,0|
|00002b80| 30 0d 2a 0d 2a 0d 6d 6e | 65 6d 6f 20 61 73 63 20 |0.*.*.mn|emo asc |
|00002b90| 27 2d 2d 2d 61 64 63 61 | 6e 64 61 73 6c 62 63 63 |'---adca|ndaslbcc|
|00002ba0| 62 27 0d 20 61 73 63 20 | 27 63 73 62 65 71 62 69 |b'. asc |'csbeqbi|
|00002bb0| 74 62 6d 69 62 6e 65 62 | 70 27 0d 20 61 73 63 20 |tbmibneb|p'. asc |
|00002bc0| 27 6c 62 72 6b 62 76 63 | 62 76 73 63 6c 63 63 6c |'lbrkbvc|bvsclccl|
|00002bd0| 64 27 0d 20 61 73 63 20 | 27 63 6c 69 63 6c 76 63 |d'. asc |'cliclvc|
|00002be0| 6d 70 63 70 78 63 70 79 | 64 27 0d 20 61 73 63 20 |mpcpxcpy|d'. asc |
|00002bf0| 27 65 63 64 65 78 64 65 | 79 65 6f 72 69 6e 63 69 |'ecdexde|yeorinci|
|00002c00| 6e 27 0d 20 61 73 63 20 | 27 78 69 6e 79 6a 6d 70 |n'. asc |'xinyjmp|
|00002c10| 6a 73 72 6c 64 61 6c 64 | 78 27 0d 20 61 73 63 20 |jsrldald|x'. asc |
|00002c20| 27 6c 64 79 6c 73 72 6e | 6f 70 6f 72 61 70 68 61 |'ldylsrn|oporapha|
|00002c30| 70 27 0d 20 61 73 63 20 | 27 68 70 70 6c 61 70 6c |p'. asc |'hpplapl|
|00002c40| 70 72 6f 6c 72 6f 72 72 | 74 27 0d 20 61 73 63 20 |prolrorr|t'. asc |
|00002c50| 27 69 72 74 73 73 62 63 | 73 65 63 73 65 64 73 65 |'irtssbc|secsedse|
|00002c60| 69 27 0d 20 61 73 63 20 | 27 73 74 61 73 74 78 73 |i'. asc |'stastxs|
|00002c70| 74 79 74 61 78 74 61 79 | 74 27 0d 20 61 73 63 20 |tytaxtay|t'. asc |
|00002c80| 27 73 78 74 78 61 74 78 | 73 74 79 61 27 0d 2a 0d |'sxtxatx|stya'.*.|
|00002c90| 20 64 66 62 20 30 0d 6e | 61 6d 65 6c 65 6e 67 20 | dfb 0.n|ameleng |
|00002ca0| 64 66 62 20 30 0d 66 69 | 6c 6e 61 6d 65 20 64 64 |dfb 0.fi|lname dd|
|00002cb0| 62 20 30 2c 30 2c 30 2c | 30 2c 30 2c 30 2c 30 2c |b 0,0,0,|0,0,0,0,|
|00002cc0| 30 2c 30 2c 30 2c 30 2c | 30 2c 30 2c 30 2c 30 0d |0,0,0,0,|0,0,0,0.|
|00002cd0| 2a 0d 2a 0d 2a 0d       |                         |*.*.*.  |        |
+--------+-------------------------+-------------------------+--------+--------+